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Foreword 



This is a memory map of the VIC-20 home computer. It's your 
P] road map to the internal architecture and operating systems of 
your computer, showing you how memory is constructed, how 
it's used, and how you can access it. 

Mapping the VIC isn't just a listing of the computer's 
memory locations. It explains the purpose of each location and 
shows you how to change the contents of many of them. 
You'll be able to make the computer do what you want it to. 
You'll be able to understand other programmers' efforts 
far more easily when you can look up the pointers, POKEs, 
PEEKs, and SYS commands that they've used. Seeing how 
someone else has programmed is only a step away from learn- 
ing new programming techniques of your own. You can use 
the extensive index and label cross reference to learn about a 
subject of interest, reading in-depth explanations of such 
things as tape use with the VIC, or how to call BASIC or 
Kernal routines from your own programs. 

There are numerous programming techniques already ex- 
plained in this book. How to use the block SAVE/LOAD fea- 
ture of the VIC; how to make the VIC's screen into a 
40-column display with a new character set; even how to con- 
trol the various connectors on the back of the VIC from within 
your own programs. 

If you're programming in BASIC, you'll appreciate the 
easy-to-understand explanations of how to use the advanced 
features of the VIC-20 in your own programs. If you're using 
machine language, you'll come back to Mapping the VIC over 
and over, referring to specific memory locations and routines. 
r~] Whether you're a beginning programmer or a veteran, you'll 

have the most complete guide to the VIC-20's memory 
available. 
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Introduction 



A memory map is like a road map. It can show you something you 
never dreamed was there, help you find the things that you always 
knew were there, and show you what you've never seen. It can help 
you get to a place from where you are and it's always there to 
remind you of forgotten details. A memory map shows you how 
things in memory are constructed, how the memory is used, who 
can use it, and what it means in the larger scheme of things. 

This book is designed to be a working resource as you program. 
When you look at others' programs, you can refer to the memory 
locations that you see PEEKed and POKEd to understand what is 
being done. SYS locations aren't as mysterious when you have a 
memory map that tells you what a routine is doing and how. The 
manipulation of pointers within a program is understandable once 
you can read what the pointer is used for and what the effect is 
when it changes. 

And a memory map can shed light on the methods and tech- 
niques used by other programmers. Understanding what their pro- 
grams do will make you a better programmer yourself, for you'll 
learn a number of new techniques and tricks of programming. You'll 
also find it easier to modify other programs once you understand 
what they do and how they do it. 

When you find yourself interested in a particular subject — 
TAPE, for instance — you can look up the subject in the keyword 
index in the back of this book. There you'll find all the locations and 
routines used for that subject. By reading the description of these 
locations and routines, as well as their many possibilities and some 
little-known facts, you'll become knowledgeable about the subject. 
These locations and routines will refer you to other related locations, 
routines, and appendices. The ke)rword index also lists the location 
of many sample programs and statements, as well as tables and 
diagrams. An additional index is provided to help you locate a mem- 
ory location quickly once you're familiar with the mnemonic label 
associated with that location. 

p«- To make full use of the memory map, you should have a work- 

; I ing knowledge of BASIC, but extensive experience isn't really nec- 

essary. The BASIC routine descriptions offer insights into the quirks 
and peculiarities of each BASIC Keyword. The Kernal routine 

I™] descriptions become more technical and describe the way the Kernal 

handles the input and output tasks on the VIC-20. The Video Inter- 
face Chip (VIC) description is thorough and explains how to use the 

rn computer's namesake chip to customize such things as screen colors 
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and size, musical tones, and characters of your own design. Other 

advanced features, such as multicolored characters, alternate screen 

flipping, and bitmapping are also explained. The section on the Ver- | i 

satile Interface Adapters (VIAs) describes the various connectors on t_J 

the back of the VIC-20, w^hat these connectors are designed for, and 

hovv^ to control and use them from within your own programs. .— , 

The ROM-based BASIC and Kemal routines can be dis- [_! 

assembled with any of several available disassembler programs, and 
the memory map will explain the purpose of the machine language 
routines. 

The program and statement examples included in the book are 
designed to be straightforward and understandable, not tricky. Extra 
levels of parentheses, additional spaces, and single statements per 
program line can be compacted to use less of the VIC's precious 
memory. 

Even though the memory map is comprehensive, new tech- 
niques, tricks, and inventive methods will be constantly discovered. 
You may find it handy to note these at the appropriate memory 
locations when you discover them, insuring that this single-source 
reference is always up-to-date with your knowledge of the VIC. 

You'll find plenty of programming techniques in this book. 
You'll learn how nonrelocatable program tapes can be relocated, 
how to call BASIC and Kemal routines from a BASIC program, what 
the effect of a shifted space is in a disk filename, and how the 
Kemal prevents you from saving memory above a certain location to 
tape. You'll also learn why x-line handshaking on RS-232 devices 
doesn't work properly, how to make a custom character set that 
gives the appearance of a 40-column screen, how to SAVE your data 
from within a BASIC program and LOAD it wherever you want, and 
other valuable programming methods. I think you'll find this book 
an invaluable guide for working with your VIC-20. 

I wrote this book because I needed it. The VIC-20 is a home 
computer with lots of potential, but there was so little documenta- 
tion available at first that the only solution was to start collecting 
memory location usage gems as though they were rare postage 
stamps. How can you write a machine language program if you have j j 

no idea where anything is in the computer? The VIC-20 Programmer's 
Reference Guide was somewhat helpful when it became available 
much later, but not to the extent that I felt necessary to effectively i j 

use the VIC-20. U 

For years I've collected, sorted, experimented, expanded upon, 
and cross-referenced the VIC-20 memory locations and routines. 

Every article, book, program, idea, and explanation that I could find ( I 

through daily trips to the computer stores and many long distance 
conversations with other VIC-20 users was grist for this mill. I dis- 
assembled BASIC and the Kernal. Programs were written to cross- j | 
reference, sort, and label the operands of that machine language 
viii 
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code. Every instruction was examined and evaluated. PET literature 
was pored over, and more recently Commodore 64 documentation 
!~] was digested for possible insights. No Commodore proprietary docu- 

■ ' mentation was available to me in this endeavor. My primary source 

of information (besides the VIC-20 itself) was the manuals and 
r-i magazine articles available on the retail bookstore shelves. 
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VIG-20 Architectiire 

The main body of this book is organized by memory location for i~j 

convenience of reference. Because of this organization, you may Lj 

encounter unfamiliar terminology or concepts in the description of a 
particular location. 

This overview explains many of the common VIC-20 terms used 
throughout the book, and gives you an idea of the VIC-20's 
architecture. 

If you're familiar with the architecture (at least at the level 
described in the VIC-20 Programmer's Reference Guide or similar ref- 
erence), you may wish to skip this overview and immediately use the 
memory location map. A block diagram of the unexpanded and 
expanded VIC-20 memory structure follows this overview. The 
diagram will be helpful to even the most knowledgeable reader as a 
source of quick configuration information. 

Logic elements. The primary computing logic in the VIC-20 is 
implemented by the microprocessor, a single semiconductor compo- 
nent, or chip, designated the 6502. The 6502 is a popular 
microprocessor used (in some form) in most Commodore computers, 
in all Atari computers, in the Apple I and II, and in several less well- 
known machines. 

The 6502 microprocessor implements the VIC-20's instruction 
set: the internal commands issued by machine language (ML) pro- 
grams. It also contains a set of registers: high-speed internal storage 
locations used by most of the instructions. The most important 6502 
registers for the VIC-20 programmer are: 

• .A (Accumulator for arithmetic operations) 

• .X (X-Index for indexed addressing) 

• .Y (Y-Index for indexed addressing) 

• .P (Processor status bits for conditional branching) 

Two 6522 Versatile Interface Adapter (VIA) chip components pro- I I 

vide timers, shift registers, and data ports for most VIC-20 Input/ 

Output (I/O): the process of reading or writing data to connected 

devices. A VIA interface is used for keyboard input and for I/O to j j 

the principal VIC-20 ports: 

• Game port used for joysticks, paddles, and so on 

• User port for modems and custom I/O devices j j 

• Serial port for VIC disk drives and printers 

• Tape port for the VIC Datassette 

u 
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The registers used to control the 6522 VIA functior\s are 
unknown to the 6502, but are mapped into memory locations for 
reference by programming instructions. 

Output of characters, graphics, colors, and sounds to a video 
monitor (or RF modulator for a TV set) is an extremely complex 
function that requires custom logic to produce the proper signals. 
This logic is implemented on the Video Interface Controller (VIC): the 
chip from which the computer gets its name. Two model numbers 
are used for the VIC chip, depending on the video signal standards 
of the country in which the VIC-20 is sold. For the United States 
and Canada, the NTSC standard prevails and is supported by the 
6560 VIC chip. For most European and Asian countries, the PAL 
video standard requires the 6561 VIC chip. This difference has little 
effect on programming, which accesses the VIC registers through 
locations mapped into memory, as in the case of the VIA registers. 

Memory. The 6502 microprocessor reads a memory range of 
locations (address space) from location to location 65535. Each 
location is composed of eight bits (Binary digiTs, each containing a 1 
or 0) that form a byte. Bytes are grouped into pages, each 256 bytes 
long, which begin on a location that is an integral multiple of 256. 
Some addresses, called pointers, are actually two bytes long. These 
16-bit addresses consist of an 8-bit page address byte preceded by an 
8-bit offset within that page. This format, using the least significant 
byte (LSB) preceding the most significant byte (MSB), is often re- 
ferred to as low byte/high byte. 

The terms vector, pointer, and link describe the same type of 
two-byte memory location containing an address of another location 
in memory. The terms have subtle differences of meaning that are of 
more interest semantically and categorically than practically. Quoting 
Jim Butterfield: "The term link is used when the address is normally 
used to connect adjacent code; in this case, it doesn't affect the pro- 
gram flow until the link is broken with a new address. A vector, on 
the other hand, is used as a jump point, and the normal program 
jumps somewhere else through the vector. In other words, a ROM 
program hits a link point and normally keeps going; it hits a vector 
point and branches out." 

A link is there in case you want to change where the routine 
normally goes, and normally points to the next sequential instruc- 
tion. A vector is where the routine will be branching to. When a 
particular address is referred to by one of these terms in other docu- 
mentation, that term is also used in this map. Therefore, you'll find 
VECTOR tables, screen POINTERS and LINK address captions for 
consistency's sake and to aid those readers who are familiar with 
each term. Fundamentally, each is two consecutive bytes that repre- 
sent an address somewhere in memory. 
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Unless otherwise noted, these two bytes are in LSB/MSB (Least *— ' 

Siginficant Byte/Most Significant Byte) format. As already men- 
tioned, this format is also referred to as low byte/high byte, but i . 

there are yet other terms used, such as LB/HB, LO/HI, and displace- 1 I 

ment/page found in other works. If you are unfamiliar with all of 
these terms, see Appendix A for an explanation of the LSB/MSB for- 
mat and other related number systems topics. [I 

The term offset is used to describe the distance from the begin- 
ning address of something in memory. The beginning has an offset 
of zero, the next byte has an offset of one, and so forth. Index usu- 
ally means the number of an entry within a table. The first table 
entry has an index of zero, the second entry has an index of one, 
and so on. A table entry is tj^ically the same length as all other 
entries in the table. Tables that have variable length entries are a bit 
more complicated and are explained as they occur within the VIC-20 
memory. 

Most eight-bit microprocessors have a similar-sized address 
space (65535 / 1024 = 64K bytes). The VIC-20 is sometimes 
unfairly compared to other microcomputers as having 5K of memory 
in contrast to 16K, 32K, or even the 64K of its big brother, the Com- 
modore 64. Actually, the 64K address space on the VIC-20 is filled 
with four types of memory locations: 

• Random Access Memory (RAM), that can be read or written 
by the program 

• Read Only Memory (ROM), containing static data that can 
only be read 

• Input/Output (I/O) Registers, mapped into memory banks 

• Expansion Banks, for accessory RAM or ROM 

In the unexpanded VIC-20, there are 5K bytes of RAM, IK of 
which is used by the VIC chip for screen color codes; 4K of ROM 
containing pixel maps of the standard character sets; 8K of ROM for 
the BASIC interpreter; and 8K of ROM for the Kemal operating sys- 
tem service routines. Also, 3K of memory is consumed (but not 
filled) by I/O registers. This leaves empty expansion blocks of 3K, 
8K+8K+8K (contiguous), and 8K (discontiguous with other expan- 
sion blocks). Data, addressing, and control lines for all five expan- 
sion blocks are routed to the VIC-20 expansion port to allow the 
interfacing of memory expansion boards or ROM cartridges. 

BASIC. If the native language, for internal purposes, of the VIC- 
20 is that of the 6502 microprocessor, there's no doubt that it speaks 

to the rest of the world in a dialect of Microsoft BASIC. Even the , ■ 

operating commands, such as LOAD, SAVE, RUN, and so on, are \ ! 

actually BASIC statements. 

A ROM-resident screen editor and BASIC interpreter are nor- 
mally activated when the 6502 receives a reset signal at power on. | ) 
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Control and data areas in page are initialized and the keyboard is 
questioned for input. Whatever you type on the keyboard is trans- 
lated into BASIC tokens, a process usually called tokenization. In 
direct mode (entered from the keyboard as opposed to program mode, 
resident within a BASIC program), the tokenized commands are 
passed directly to the BASIC interpreter and executed immediately. 
Keyboard-entered commands preceded by line numbers are saved 
for later execution in what is usually called the BASIC program stor- 
age RAM (a contiguous area of memory addressed by a pointer in 
page 0). 

BASIC stores a command such as PRINT as a one-byte repre- 
sentative of that word in the BASIC program storage area. This tech- 
nique tends to best use program storage space and also helps BASIC 
execute faster. Reducing a BASIC word to this one-byte shorthand is 
called tokenization, and the one-byte character is knovm as a token. 
When the program is LISTed, BASIC converts it back into a BASIC 
keyword. See Appendix B for the description of the internal format 
of BASIC statements and variables. Appendix C has a code chart 
that shows the one-byte values used for BASIC tokens. Harvey Her- 
man in COMPUTEI's First Book of PET/CBM discusses tokens in his 
article "Tokens Aren't Just for Subways." It may be something you'll 
find of interest if you want further reference on tokens and 
tokenization. 

In program mode (when a program is executing) the screen edi- 
tor can be used to obtain input from the keyboard or screen, to dis- 
play that information, and to manage any program output going to 
the screen. 

A user machine language routine called a wedge can insert itself 
into the vector of addresses of routines given control by the Kemal 
keyboard monitor. A wedge can examine each command, decide 
whether it wishes to interpret that command, and, if not, pass it on 
to other wedges or the BASIC interpreter. 

A final point of architectural interest implemented in the BASIC 
interpreter is floating point arithmetic. The only arithmetic functions 
implemented on the 6502 microprocessor are fixed-point binary and 
decimal addition and subtraction. The BASIC language further 
defines multiplication, division, and exponentiation and has fixed- 
and floating-point binary data types. This arithmetic is simulated by 
BASIC ROM routines that define floating point accumulators in low 
storage. Even machine language programs frequently use these ROM 
routines for arithmetic. 

Kernal. Another set of ROM routines in the VIC-20 provide a 
common set of services to the BASIC interpreter, user BASIC pro- 
grams, user machine language programs, and any other type of pro- 
grams that happen to be running in the computer. These Kemal 
services are siinilar in most Commodore computers. Some are 
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addressed indirectly through vector references whose locations are also ' — ^ 

common. The pointers, control blocks, and other data areas defined 

in pages 0-3 by Kemal routines are less common among Com- i i 

modore machines but are quite compatible between the VIC-20 and I I 

Commodore 64. 

The services provided by Kemal routines are in several cate- 
gories. The most obvious and most widely used is I/O device sup- \_j 
port. The 6522 VIA I/O functions are tedious to program, involving 
a great deal of time-dependent bit manipulation, so nearly all pro- 
grammers take advantage of the Kemal routines to accomplish byte- 
or block-oriented I/O functions. These functions are discussed later. 

The screen editor used by BASIC and most user programs for 
keyboard and screen output is also provided by the Kemal. On 
input, the screen editor provides the familiar support for the INSert 
and DELete key, the cursor positioning keys, and the RETURN key. 
On output, the line-wrap feature and the interpretation of cursor and 
color control characters in the output stream are the responsibility of 
the screen editor. Most software uses the screen editor for character 
I/O to the keyboard and screen, so you tend to be most familiar 
with its functions. Exceptions for input are the BASIC GET com- 
mand and the use by many word processors of alternate input 
editing conventions. For output, the most visible exceptions are 
games and other graphic applications that generate screen output by 
POKEing or otherwise updating the areas of storage that define the 
display. 

The Kemal also provides monitoring services for the various 
kinds of intermpt conditions generated within the VIC. One of the 
most significant interrupts is the IRQ JIFFY, which controls a Kemal 
monitoring routine pointed to by a vector in RAM at designated time 
intervals, called jiffies. Routines chained to the jiffy vector are used 
for almost all asynchronous (can-happen-at-any-time) activity in 
VIC-20 programming. 

Other Kemal functions include: autostart of plug-in ROM car- 
tridges, memory initialization and management, and some screen- 
oriented service routines that assist in writing portable or translatable 
programs. The memory map contains a complete description of all 
Kemal services. 

Front-ends, Preambles, and Wedges. Many times a Kemal or 
BASIC routine could perform some additional work for you, if you 
could just add some instructions to it. The routines are located in 
ROM and can't be changed, but by adding instmctions to the begin- 
ning of the routine, you may be able to add to or change it. This 
addition of instructions is possible when a vector in RAM points to 
the beginning of the routine, and this vector is used by other BASIC 
or Kemal routines to get to the routine. The vector can be changed 
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- to point to yovir own routines, which will perform the functions you 

wish, then go on to the original ROM routines. These routines 

r~] placed before the standard routines are called front-ends, preambles, 

_ J or wedges. The VIC-20 contains vector tables for many of the BASIC 

and Kemal routines. These can be modified to point to your own 

r-i intercepting routines. 

' J Input/Output. On the VIC-20, I/O is accomplished in many 

different ways. This can be confusing, compared to architectures 
which have a more regular I/O structure, but is necessary to the ef- 
ficient functioning of ttie machine. 

Devices attached to the serial port, such as the Commodore disk 
drives and printers, are presumed to be intelligent at implementing 
high-level control functions. The Kemal routines which support the 
serial port must contend with idiosyncrasies of the 6522 VIA, such as 
the need to shift data in and out bit by bit, but don't need to know 
anything about the device. The VIC 1540/1541 disk drives, for 
example, have their own 6502 microprocessor and their own RAM 
and ROM containing a high-level set of disk management logic 
called DOS (Disk Operating System). 

At the opposite extreme, the tape port device is an extremely 
low-level analog electrical attachment. The Kernal routines which 
perform tape I/O must literally detect and generate the time- 
dependent changes in recording levels that represent the bits on the 
tape, as well as higher level data management functions. 

User port and game port I/O can have aspects of either extreme. 
The only Kemal routines in direct support of the user port simulate a 
6551 UART (Universal Asynchronous Receiver/Transmitter) chip's 
clocking and handshaking logic and control registers in support of 
devices such as modems and printer interfaces that use a protocol for 
I/O similar to the RS-232 standard. The 6551 UART was not 
actually included in the VIC, so the software simulation of its logic 
and registers was required in the Kemal as a way of supporting the 
other ROM and package software that assumed those functions. 
(Note that the user port does not provide electrical compatibility with 

J— I the RS-232 standard, either with voltage levels or connector pinout; 

: I extemal drivers and connector adapters are required to attach RS-232 

devices to the VIC.) 

Some I/O is directed into memory in usable form by the 6522 

fn VIA. For example, switch-type joystick input can be received directly 

by the program. Also, keyboard input can be directly observed while 
a key is held dovm. Kemal IRQ routines stabilize the keyboard input 

rn to prevent unwanted multiple keystrokes, move the key code to a 

' ' low-storage location, translate the key code according to any SHIFT, 

CTRL, or Commodore keys depressed, and append it to a keyboard 

r-1 input buffer for reference by higher-level input routines. 
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The last I/O interface on the VIC-20, the video (and also sound) 
port, is such a fundamental part of the machine that it deserves its 
own section. 

VIC Chip. If the 6502 microprocessor is the brains of the VIC- 
20, memory its skeleton, and the 6522 VIAs its eyes and ears, the 
6560/6561 VIC chip is really its heart. No understanding of the VIC- 
20 architecture can be complete without some knowledge of the VIC 
chip functions. 

As mentioned previously, the VIC chip is responsible for gen- 
erating the composite video and sound signals that are sent to a 
color display monitor or RF modulator for transmission to a tele- 
vision set. Normally, the VIC chip maps the display screen into an 
array of pixels (picture elements, which are dots that are the smallest 
units of video information) that is normally 176 (22 x 8) pixels wide 
and 184 (23 x 8) pixels high. It also displays a border and a back- 
ground of designated colors. 

Color, mode, and other control information is supplied to the 
VIC chip via its 16 registers, which are mapped into memory loca- 
tions as described in the memory map. Three other memory areas, 
addressed through the VIC chip registers, are used by the VIC chip 
to generate character or graphic displays. 

• Screen memory, sometimes called the Video Matrix, is an array 
of memory with a byte for each character position on the screen 
(normally 506 [22 x 23] character positions). Each byte in screen 
memory contains the offset in character memory. 

• Character memory (usually one of the banks of character 
ROM) of the bit map of the pixels to be displayed at the correspond- 
ing screen position. Usually, control information in the VIC chip reg- 
isters has the VIC chip in single color mode. In this case, each bit in 
character memory selects whether the corresponding pixel color is to 
be the same as the background color (pixel invisible or off) or to be a 
color selected by the code contained at a position in color memory. 

• Color memory corresponding to the screen location of the 
character. 

Custom character sets can be designed and placed into 8 x 8 or 
16 X 8 patterns in RAM addressable by the VIC chip (only built-in 
RAM) and then used by selecting that RAM in the VIC chip reg- 
isters. What is usually called medium-resolution graphics can be 
developed using the same technique, with custom characters for the 
graphic images. High-resolution graphics on the VIC-20 are created 
by initializing screen memory to simply point to successive locations 
in a bitmap of the screen addressed as though it were character 
memory by the VIC chip. 

Multicolor mode uses two bits in character memory to color each 
pixel, so it cannot make reasonable use of the built-in character 
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ROM. The two bits select among the background color and the 
character memory color for that location, as in single color mode. 
The border color and an auxiliary color are also defined in the VIC 
chip registers when multicolor mode is selected. 

Some little-known functions of the VIC chip are the light pen 
position detection, which can be used by the program to determine 
the screen position in front of a light pen and resistance value sens- 
ing, for use in reading up to two peripheral devices, such as game 
paddles, that contain potentiometers for sensing or measuring 
position. These may also contain other variable resistance-sensing 
devices, such as photo-resistors or carbon microphones, for special 
applications. 

The final function of the VIC chip is sound. Five of the VIC chip 
registers mapped into memory control sound volume, the frequency 
of each of the three tone generators (voices) and the noise generator. 

Common Plug-In Cartridges. A wide variety of VIC-20 soft- 
ware is available in plug-in cartridge form. A cartridge is simply a 
means of adding memory, usually ROM, in one of the expansion 
blocks. Most of the software is application programming of one kind 
or another, like games, word processors, and so on, and does not af- 
fect the architecture. Several plug-in cartridges, though, are really in- 
tended as architectural extensions or supplements: 

• Programmer's Aid — extensions to BASIC editing commands 

• Super Expander — graphic and sound supplements to BASIC 

• Machine Language Monitors — replacing the BASIC editor 

• Other language monitors — that also replace BASIC 

Compatibility with the Commodore 64. With attention to some vari- 
ations in the memory map, it's possible to write software for the 
VIC-20 that can be readily translated to the Commodore 64. 

This is possible because of a number of similarities between the 
two machines. The 6510 microprocessor used in the 64 has the same 
instruction set as the 6502. Its only significant extension is that a 
memory-mapped I/O port is added. The BASIC dialect on the Com- 
modore 64 is identical to that on the VIC-20. Indeed, purely BASIC 
programs, written for the VIC-20 with no PEEKs and POKEs, should 
run correctly with no modifications on the 64 if statements are 
restricted to 80 characters, instead of the 88 allowed on the VIC-20. 
The Kernal service routines are fundamentally the same on both 
machines. Finally, much of the low-storage data defined in pages 0- 
3 is identical, with key differences noted in the memory map. 

However, the 6560/6561 VIC chip display, graphics, and sound 
functions are implemented much more elaborately on the 64 with a 
6566/6567 VIC-II chip and a 6581 SID (Sound Interface Device) 
music synthesizer chip. These new devices are not simply compatible 
I I supersets of the VIC chip, either in function or in programming. 
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The VIC-II chip has much more extensive graphics capability, 
but changes the function and location of its control registers. Pro- 
grams that are intended to be translated to the 64 must isolate the 
logic that manipulates the VIC chip registers. Also, the VIC-II chip 
defines a larger normal screen (25 lines of 40 characters), so a pro- 
gram that POKEs directly into screen or color memory must take 
care to use system-defined data areas and service routines to dis- 
cover the location and dimension of such memory. 

The SID chip provides a high degree of control over the wave- 
form and frequency of its several voices. However, it is quite com- 
plex to program compared to the VIC chip's voices. Even to 
duplicate these simple sound functions takes quite a bit of program- 
ming, so the audio effects of game programs, for instance, probably 
will need to be completely redesigned as well as reprogrammed 
when translating to the 64. Again, it would be wise to attempt to 
isolate the statements that control sound effects. 

Actually, most programmers would agree that the incompatibil- 
ities in architecture introduced on the Commodore 64 were justified 
by its additional functions. Other home computer vendors have 
maintained more compatibility among their models but sacrificed the 
opportunity to enhance function, particularly in such areas as graph- 
ics and sound. 

Conclusion. With this understanding of the overall VIC-20 
architecture, you can now jump into the memory map and its cross 
reference to find out how to make the VIC-20 do amazing things for 
you! 

Block IHagram of All VIG— 20 Addressable Memory 

No Expansion 3K Expansion 8K-32K Expansion 

Differences Differences 

Decimal Hex 

65535 - - - $FFFF 

8K Kemal ROM 

57344 - - - $E000 

8K BASIC ROM 

49152 --- $C000 49152 --- $C000 

( User Area ) 
( 8K Expansion ) ( for POKEs,ML ) 

( RAM / ROM ) ( if this 8K ) 

( (autostarted) ) ( is added ) 

40960 - - - $A000 40960 $A000 

I/O EXP. B3 

39936 - - - $9C00 

I/O EXP. B2 

38912 ***** $9800 
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* Color RAM * 
38400 ***** $9600 
I/O EXP. BO 
37888 - - - $9400 
VIA 1/2 

37136 - - - $9110 
VIC 6560 
36864 - - - $9000 
Character ROM 
32768 - - - $8000 

( 8K Expansion ) 
( RAM / ROM ) 



24576 



$6000 



( 8K Expansion ) 
( RAM / ROM ) 

16384 - - - $4000 

( 8K Expansion ) 
( RAM / ROM ) 

08192 ***** $2000 
* Screen Area * 
07680 ***** $1E00 
User PGM Area 
3584 RAM 
04096 - - - $1000 
( 3K expansion ) 
(RAM) 

01024 - - - $0400 
BASIC / Kemal 
IK Work Areas 
00000 - - - $0000 



User PGM Area 
6656 RAM 



01024 - - - $0400 



38400 ***** $9600 
* Color RAM * 
37888 ***** $9400 



32768 - - - $8000 

( User PGM Area ) 
( 28160 if +24K ) 



24576 



$6000 



( User PGM Area ) 
( 19967 if +16K) 



16384 



$4000 



( User PGM Area ) 
( 11776 if +8K ) 



04608 ***** $1200 
* Screen Area * 
04096 ***** $1000 
( 3K non-BASIC ) 
( when filled ) 
01024 - - - $0400 



Fomiat of the Map Descriptions 

Locations and routines in this book are presented in this format: 

Decimal $Hexadecimal Label Values 

(Notes) 

Title of Location or Routine 

Explanation of location or routine usage by all routines of 
BASIC and the Kemal with suggestions for user usage or testing. 
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Decimal. The decimal location range (for PEEKs and POKEs). ^^ 

$Hexadecimal. The hexadecimal location range preceded by $ 
for machine language (ML) users. jj 

Label. Mnemonic label or an invented label followed by *. La- 
bels are easier to remember and identify than the decimal or _ 
hexadecimal address. A label-to-address cross reference index is ^^ 
included in the back of this book. 

(Notes). {User Storage) indicates locations that can be used for 
user storage without drastic complications. Be sure to read the com- 
plete description of the location for possible dependencies by BASIC 
or the Kemal. 

{Possible User Storage) flags locations that are available for your 
use when the listed functions are not being performed by the Kemal 
or BASIC. 

{Handy Location) flags locations that are helpful to the BASIC or 
ML programmer in obtaining information or causing actions that are 
unavailable through BASIC keywords. Every memory location may 
be useful to someone, for use in some particular situation. This flag 
is placed on those locations that have the greatest potential for the 
average user. Many of these Handy Locations include short sample 
programming routines to demonstrate their use. 

Values. The contents of the location on an unexpanded VIC-20 
in decimal and hexadecimal. Included if the contents are predictable. 
As in the rest of the book, the hexadecimal location is separated 
from the decimal by parentheses. 

Explanation of Location or Routine Usage. Here you'll find a 
description of the purpose(s) of the location or routine, along with 
any considerations, relationship with other locations or routines, tips 
and hints, further information references, and sample routines to ex- 
plore this location more fully. 
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Memory Page 



^ VIC-20 memory between location and location 255 is referred 

to as page or zero page. A page on the VIC-20 is a chunk of mem- 
ory 256 bytes long. Page 1 is the chunk between 256 and 511, and 
correspondingly page 4 refers to locations 1024 through 1279. Since 
the VIC-20 has a memory range of through 65535 (a total of 65536 
bytes), there are 256 pages of memory. The term page is used as a 
shorthand method of referring to a range of memory, and you'll 
primarily see it when page or page 1 memory locations are dis- 
cussed. For more information about the concept of pages, see page 
114 of The VIC-20 Programmer's Reference Guide. 

Page is an important section of memory, as many VIC-20 
machine language (ML) programmers will confirm. Page locations 
are required by some of the handiest ML instructions, and instruc- 
tions can be written with shorter and faster operands when using 
page 0. When bypassing the facilities of BASIC or using only a por- 
tion of it, many page locations can be freed to be used as the ML 
programmer desires. 

To the BASIC programmer, page is also important since both 
BASIC and the Kernal store some of the most intriguing and useful 
pieces of information in these memory locations. Knowing what has 
been placed here and how to use this information can open up a 
whole new dimension of possibilities for customization and control 
of the VIC-20. 

Let's begin with a look at the portion of page that is free of 
the Kernal and of which BASIC takes charge. 

Location Range: 0-143 (SO-SBF) 

BASIC Working Storage 

Page working storage for BASIC. 

INITMEM* routine initializes this area to zeros at power-on or 
reset. (Some memory expansion socket boards have a reset switch. 
See location 45 for a description of how to make your own.) A fol- 
low-on routine (INITBA, a BASIC cold start routine) then initializes 
any locations with values that BASIC needs. See the conmients in 
each location for initialization values. 

$0 USRPOK 76($4C) 

(possible user 

storage) 
The INITBA routine initializes this location during power-on/ 
reset. 



1-2 



U 

u 
u 



Used with USR vector at location 1-2 ($1-2). BASIC interpreta- 
tion of the keyword USR causes a branch to this location (via the 
FUNDISP table). This JMP opcode then causes the vector in 1-2 ~ 

($1-2) to be branched to, ending in the programmer's USR routine. I | 

You may use this byte for your own purposes, but POKE 0,76 before 
attempting USR. — 

The Commodore 64 uses location 784 ($310) for a JMP opcode, [J 

and 785-786 ($311-312) for the USR vector. Locations 0-1 are vraed 
into the chip for memory control on the 64, while location 2 is 
unused. 

1-2 $1-2 ADDPRC 72/210 ($48/D2) 

(possible user 
storage) 
The USR jump vector in LSB/MSB (displacement/page) form. 

Before using the USR keyword, you POKE the LSB/MSB 
address of the desired ML routine in these locations. For example, if 
an ML routine at 828 is the target ML routine (the tape buffer which 
begins at location 828 is traditionally a favorite location) POKE 
2,INT(828/256):POKE l,828-(PEEK(2)*256):X=USR(expression) 
sets location 1-2 to 60/3. 60 is the Least Significant Byte, 3 the Most 
Significant Byte. In hex, that's $3C/03 (normally expressed as 
$033C), which is 828 decimal. 

If the preceding seems mysterious to you, you may want to 
review Appendix A which discusses number systems and hex/ 
binary/ decimal conversion methods, charts, and programs. 

The evaluated expression result is placed into the floating point 
accumulator at location 97-102 ($61-66) in floating point format by 
BASIC. When your ML routine is executed, it converts the floating 
point accumulator back to a two-byte integer with a JSR to $DC9B. 
Locations $61-62 then contain the two-byte integer (MSB/LSB). 

When the ML routine is ready to return to BASIC, it loads the .Y 

register with the LSB of the return number, and .A with the MSB. 

JSR $D391 then converts these in the floating point accumulator 

found at 97-102 ($61-66). When the ML routine issues the RTS j 

instruction, BASIC assigns the floating point contents of the floating \ | 

point accumulator to the variable assigned by the USR statement (X 
in our example). Once you have become familiar with the use of _ 
locations 780-783 ($30C-$30F), which are the register SAVE area [J 
for SYS, this process of number conversion can be done in BASIC. 
At power-on/reset, locations 1-2 are loaded with a vector that 
points to the ERROR routine, the BASIC error message handler. This 
will cause an ILLEGAL QUANTITY error message if USR is issued 
before 1-2 have been altered by POKEs to the desired ML routine. 
Once you have changed the default vector, the ILLEGAL QUAN- r - 
TITY message will not appear. If the vector does not point to valid 1 ! 
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6502 instructions, the VIC-20 will probably hang until you reset it or 
turn it off and on. 

You may use locations 1-2 for your own purposes if you are not 
using the USR command. 

On the Commodore 64, this function has been moved to loca- 
tions 785-786 ($311-312). Keep this in mind if you are writing pro- 
grams that are to run on both machines. 

For an in-depth discussion of the potentials of USR, see "How 
to Use SYS and USR," by J.C. Johnson in the November and Decem- 
ber 1982 issues of COMPUTE!, or "PEEK and POKE: A USR Instruc- 
tion Sheet," by George Gaukel in the May 1983 issue of Commander, 
for a clever technique of extending language functions with the USR 
command. 

3-4 $3-4 ADRAYl 170/209 ($A A/ Dl) 

(user storage) 
Vector to floating point/integer conversion routines. 

Initialized during power-on/reset to routine INTIDX*, which is 
at location 53674 ($D1AA). It appears that BASIC (and the Kernal) 
never use this vector. Nonetheless, you may want to take advantage 
of this vector and use it as a level of protection against future ROM 
changes. 

5-0 $5-0 ADRAirZ 145/2U ($91/03) 

(user storage) 
Vector to the integer to floating point conversion routines, start- 
ing at MAKFP. 

The power-on/reset routines initialize this location. No ref- 
erence to this location is found in BASIC or the Kernal. You can also 
use this vector to protect against future ROM changes. 

7 $7 CHARAC 

Search-character for scanning BASIC statements. 

This is a busy and critical location, used in conjunction with 
location 8 ($8) by BASIC routines that scan the BASIC input buffer 
at 512 ($200), looking for line ends, colons, quotes, commas, and 
other special characters. 

Typical values here are the ASCII codes for colons commas, 
quotes, or zeros. String handling routines may use this location dur- 
ing the scan of BASIC statements in locations other than the BASIC 
buffer. A pointer to that area will be set in 111 ($6F), which is used 
as a temporary string pointer holder. 

Still other routines (AND, OR, DECBIN) use these locations (7-8) 
for work areas for their processes, since they do not interfere with 
scanning. 
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8 $8 ENDGHR 

Scan-quotes flag for scanning BASIC statements. _. 

See the description of location 7 ($7). I I 

This is also used during the tokenization of a BASIC statement. 

9 $9 TIIMP9S 

(possible user 
storage) 
Column that the cursor was on just before last TAB or SPC. 

This is a logical, not physical, column and can range between 
and 87 since there are 88 columns on a logical line. 

TAB or SPC obtains the cursor column from the Kemal, which 
uses locations 211 ($D3), cursor displacement within the screen 
RAM line, and 213 ($D5), logical line length. TAB or SPC stores the 
cursor column at this location and uses it to calculate the target 
cvirsor location. 

This location may be used as desired between SPC and TAB 
functions. 

19 SA VERGHK 

(possible user 

storage) 
Tape: 0=LOAD, 1= VERIFY 
LOAD sets this byte to and VERIFY sets it to 1. 

LOAD and VERIFY are similar processes, handled within the 
same routines, and they use this location to determine which process 
is occurring. 

This value is passed to the Kemal routine LOAD, which saves it 
in 147 ($93), a LOAD/VERIFY switch byte, for its ovm use. 

11 $B C9UNT 

Buffer index/array dimensions. 

This location is used as an index into the BASIC input text 
buffer at 512 ($200) for tokenization and store-the-line tasks. When 
the line has been fully tokenized, this location holds the length of 
the tokenized line, including four bytes for a line number and link 
address. See the BASIC routine NEWLIN at 50332 ($C49C). — 

Array processing, such as building an array or locating an array I f 

item, uses this location to calculate the size of an array descriptor. It 

also calculates the number of subscripts specified when referencing 

an item, and the number of dimensions in an array definition DIM. j I 

For example, DIM X(5,10,15) would set this location to 3. 

Both AND and OR use this location. OR sets this location to 255 
($FF), while AND sets it to zero. 
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12 $C DIMFLG 

Flags for locate-or-build-array routines. 

; I Various temporary flags are set ar\d used by the Kemal to signal 

to itself whether the variable is an array, whether it's numeric or 
string, whether the array has already been DIMed, and if a new 

i~| array is to be the default size. 

The coding of routine ARY5 allows redefinition of an array, 
such as DIM X:X(5)=2:DIM X, without getting the REDIM'D ARRAY 
error message or affecting the contents of X(5) as long as you don't 
specify a different size for the array. 

13 $D VALTYP 

(handy location) 
Type of variable: 255 ($FF)=string, 00=numeric 

BASIC routines set this location to indicate the type of variable 
being processed. FRMEVL (expression evaluation) routines set this 
for every variable located or created. 

Additional locations that are helpful when evaluating variables 
are 14 ($E), 69 ($45), and 71 ($47). 

14 $E INTFLG 

(handy location) 
Numeric variable type: 128 ($80)= integer, 00= floating point 

This is not meaningful unless location 13 ($D) is set to zero, 
indicating a numeric variable. 

See Appendix B for details of the format and range of both 
types of numeric variables. FRMEVL (expression evaluation) and 
associated routines also maintain this location. 

15 SF GARBFL 

Flag byte: LIST quote/collect done/tokenize character. 

LIST uses this byte as a flag to prevent detokenization of a 
character string within quotes. 

This location indicates that garbage collection has already been 
tried while adding a new string, resulting in an OUT OF MEMORY 
error message. 

It is also used as a work byte while tokenizing a line in the 
BASIC text buffer at 512 ($200) to prevent DATA items from being 
tokenized. 



16 $10 

Subscript or FN X flag byte. 

The BASIC routine EVLVAR (locate or create a variable) uses 
this byte as a flag to remind itself that parentheses ( ) are allowed in 
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the current BASIC statement. Parentheses are allowed if a ' — ' 
subscripted variable or an FN command is in the statement. 

When FN is defined, this location is set to 128 ($80) so that r - , 

EVLVAR will know to create or replace a function definition. I — i 

A function can be replaced by redefining it. For example: 

DEF FNZZ(Q)=2*Q:X=FNZZ(66):DEF FNZZ(S)=22/X 

replaces the function named ZZ. 

FN redefinition never frees any memory since FN commands are 
stored in the BASIC statement which includes the DEF FN, as well 
as seven bytes for the descriptor pointing to them. 

The name given to a function can be the same name as an exist- 
ing or future floating point variable. For example: 

DEF FNB(A)=A/22:B=FNB(B) 

is completely valid. 

17 $11 INPFLG 

Indicates which of READ, INPUT, or GET is active. 

0= INPUT; 64 ($40)= GET; 152 ($98)= READ 

This location is used by the READ routine, which includes com- 
mon instructions for all three keywords, to determine which sections 
of code to execute. Some of the differences in these routines are: 
show prompt and ? for INPUT; only obtain one character for GET; 
echo back INPUT characters; and allow colon and comma as valid 
data for GET but treat them as delimiters for READ and INPUT. 

This location is also used to determine the appropriate message 
in case of an error. For example, it will show the line number of a 
DATA statement if READ data is bad; REDO FROM START or FILE 
DATA ERROR will display if INPUT data is bad; and EXTRA 
IGNORED or no message will show depending on the active chan- 
nel number specified in location 19 ($13). 



18 $12 

TAN/ SIN sign/comparison results. 

SIN and TAN use this byte to detemune the resultant sign. [_J 

The formula evaluation routine stores at this location the 
returned results from math operator routines it calls. 

String comparison routines also save their results here. j j 

During comparison of variable A to variable B, the value saved 
here is 1 if A>B, 2 if A =B, or 4 if A<B. Combinations of these val- 
ues may also be here, if the routine that evaluated A and B performs 
more than one comparison. For example, if 5 was stored here, it 
would indicate AoB. The AND and OR routine does not set this 
location. 
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19 $13 ClANin. 

(handy location) 
Current channel number for BASIC input/output routines. 

This is a significant and active location for BASIC. Whenever 
BASIC needs to talk to a device, it looks here to determine the cor- 
rect channel number. 

See location 153 ($99), current input device number, for an 
explanation of the process BASIC uses to tell the Kemal what the 
input channel number should be. 

Altering this location can make BASIC think that tape or disk is 
the keyboard, for example. 

VIC-20 devices are: 

keyboard 

1 tape 

2 RS-232/user port 

3 screen 
4-5 printer 
8-11 disk 

Device numbers 4-31 could be any type of serial device. 

Let's see how this location is used by BASIC, so that you can 
use it to your advantage. If an error message is being displayed, the 
input device number is restored to zero, indicating the keyboard, so 
that error messages will appear on the screen, rather than the CMD 
device, with the necessary carriage return and linefeed. 

The PRINT routine uses this location to test if carriage return 
and linefeed are needed. 

CMD saves the new output file number here, then calls the 
Kemal to open that device for output, leaving it in a listen mode. 
PRINT* uses the same routine, but then closes the channel, taking 
the device out of listen mode, and resets this location to zero. 
DEVICE NOT PRESENT or FILE NOT OPEN may be displayed on 
the screen, but READY would appear on the new output device, as 
would any INPUT prompts. Hitting RUN/STOP-RESTORE while 
!-^ CMD is active to the VIC 1525 printer can hang the computer. 

I PRINT tests this location and normally uses cursor right charac- 

ters for screen tabbing rather than spaces. You could alter this by 
__ changing this location. 

\ If INPUT data is bad, FILE DATA ERROR is shown if this loca- 

tion is not zero. GET, GET#, and PRINT* will restore this location 
to zero when done, effectively cancelling any active CMD. INPUT* 
"n does the same thing. INPUT will also cancel if this location is not 

' zero. Thus PRINT is the only I/O keyword that can be used without 

cancelling the CMD device. LIST also leaves this location as it was. 
r- 1 INPUT also accepts a carriage return from the keyboard and 
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shows it as a null string, but only if this location is zero. For any- ' — ' 
thing else, it gets the next piece of data and no prompt is printed. 

READ, used for INPUT also, will print EXTRA IGNORED as an r - 

error only if this is zero. lJ 

Power-on/reset routines set this location to 0, as does RUN/ 
STOP-RESTORE. Here are some suggestions for using this location: 

• Tape, printer, or disk can be used as the CMD target device. 
The file number must be between 1 and 255. 

• Remember that zero is not a valid CMD file number, and that 
CMD may have a string just as PRINT* can, but needs a comma 
before it. For example, OPEN4,4:CMD4,"PRINT THESE WORDS". 
That's because PRINT* and CMD use the same routines. 

• Change this location to a number greater than zero to sup- 
press the EXTRA IGNORED error message when inputting from the 
keyboard. This POKE will also cause INPUT to not show a ? and 
will ignore a carriage-retum-only entry. 

• See location 153 ($99), input device number, for instructions 
for reading tape as though it were the keyboard. 

• Reissue CMD after GET, INPUT*, PRINT*, LOAD or RUN. 
When writing your program, you could also avoid CMD-cancelling 
keywords and obtain keyboard input from the keyboard buffer (see 
location 631, $277) by adding a front-end to the IRQ keyboard scan- 
ner in location 788 ($314), or by examining location 197 ($C5) or 
203 ($CB), matrix of last/current key pressed, and 653 ($28D), the 
current shift pattern. 

• See location 154 ($9A) for details of input/output diversion to 
other devices using SYS and locations 780-783 ($30C-30F), the SYS 
register SAVE area, or by using ML. 

The following routine demonstrates a number of uses of this 
location. This short program will suppress the question mark nor- 
mally displayed in an INPUT command, leaving instead the cursor 
on your chosen default character. It will also ignore a null entry, 
made when the user presses RETURN without entering any charac- 
ters, and will allow a null entry to represent an entry of the number 
zero. Notice that ?FILE DATA ERROR will be displayed if string 
data is entered for a numeric variable, rather than the usual message j ( 

?REDO FROM START. ^ 



Progfam l-l. Prompt Supprassion M 

5 REM LOCATION 19 $13 %CHANNL 

10 POKE 19,88:PRINT"?A=32{2 LEFT}"; :REM ";" KEEPS _ 

CURSOR ON DEFAULT, IGNORES NULL ENTRY 
15 REMOVING ";" ALLOWS A NULL ENTRY TO BE 
20 INPUTA 
30 POKE19,0 :REM CLEANUP SO CR/LF PRECEEDS PRINT 
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35 REM PRINTCHR$(13)A : REM WITHOUT 13 WILL PRINT 
{ SPACE }0N SAME LINE-2 SPACES AWAY PROM END 



20-21 $14-15 UNNUM 

(handy location) 
n Line number integer in two-byte LSB/MSB format. 

Subject line number for GOTO, LIST, ON, and GOSUB is stored 
here, as well as the line number of a BASIC line to be replaced, 
added, or deleted by the BASIC line editor NEWLIN at 50332 
($C49C). The DECBIN routine puts the number here for all users. 

By placing a BASIC line number here (LSB/MSB), SYSing to 
50707, and examining the .P register in 783 ($30F), you can obtain 
the address of the line's link field in 95-96 ($5F-60) if the carry flag 
is set (bit of .P is on). If the carry flag is not set, the line number 
doesn't exist in the program. This capability would interest advanced 
BASIC or ML programmers. 

Here's a short program which does this: 

Program 1-2. Idne's Idnk Field Addross 

300 POKE 15,INT(LN/256):REM LINE NUM MSB 

310 POKE 14,LN(PEEK(15)*256):REM LINE NUM LSB 

320 SYS 50707: GO SEARCH 

330 IF (PEEK (783) AND 1)<>1 THEN 500: REM NO LINE F 

OUND 
340 LA=PEEK(96*256)+PEEK(95):REM POINT TO LINE 

The LIST routine saves the highest line number to be listed, or 
65535 ($FFFF) for all, in this location. 

GOTO and GOSUB determine which way to scan to find the 
subject line by testing if the subject line number MSB is greater than 
the current line number MSB. If so, it scans forward; otherwise, it 
scans from the first line of the program. Try to minimize the search 
time in your own programs by being aware of the scan direction that 
will be used. A GOTO to the line that the GOTO is on would result 
n in the maximum search time if it were the last line of the program. 

Take a look at Figure 1-1 for some examples of search patterns. 
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is sometimes this 
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2048 












2304 











•Notice that the search starts at the beginning of the program even though the subject 
line number (1791) is greater than the current line number (1536). This is because the 
MSB of 1791 is not greater than the MSB of 1536. 



Floating point to integer conversion MAD ADR, using FPINT to 
do the actual conversion, puts the output integer here. 

PEEK saves the contents of this, uses it as a pointer to the sub- 
ject byte, then restores the previous contents. 

POKE, WAIT, and SYS use this as a pointer to the subject mem- 
ory location. 



22 $16 TEMPPT 25 ($19) 

Pointer to available slot in temporary string stack. 

The temporary string descriptor stack is at 25-33 ($19-21) and 
has room for three string descriptors of three bytes each. Possible 
values then are: 25 ($19) if empty and 28 ($1C), 31 ($1F), or 34 
($22) if full. An example of temporary strings: 

PRINT MID$("abcdefgh",3,4)-l-" is cdef." 

In this example, cdef and cdef is cdef are both temporary strings. 
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43-44 



See 23 ($17), the last string descriptor used, for a related 
pointer. 

The CLR routine resets this location back to 25 ($19), as does 
power-on/reset. 

When tr5dng to save a string descriptor in the temporary stack, if 
the value is 34 ($22), then the FORMULA TOO COMPLEX error 
message will be displayed. For other values, the descriptor is saved 
and this location's value is incremented by three. 

The garbage collection routine checks this pointer to determine 
if there are temporary slots that should be cleaned up. 

23-24 $17-18 LASTPT 22/0 ($16/0) 

Pointer to the last string descriptor used in the stack. 

Possible contents are 25 ($19) and if only one string descriptor 
is used, 28 ($1C) and if two are being used, or 31 ($1F) and if all 
three have been used. If none of the slots is used, location 22 ($16) 
contains a value of 25 ($19). 

25-33 $19-21 TEMPST 

Descriptor stack tor three temporary strings. 

Each descriptor contains the length of the string, as well as the 
address, in LSB/MSB format of the string's beginning in the BASIC 
program line or string storage pool. 

34-37 $22-2S INDEX 

Miscellaneous temporary pointers and SAVE areas. 

This area is used throughout BASIC to hold temporary pointers 
and calculation results. It's also used as a jump vector for the math 
operation routine address when formula evaluation has determined 
the correct routine to be used. 

38-42 $26-2A RESHO 

BASIC multiplication work area. 

r~| These locations are used by BASIC multiplication and division 

i I routines, and by array creation routines for array size computations. 

^ 43-44 $2B-2C TXTTAB 1/16 ($1/10) 

i I Pointer to the start of the tokenized BASIC program. 

If a byte containing zero does not precede the location pointed 
to, a SYNTAX ERROR message will be given when RUN is typed in. 
Power-on/reset routines place the zero here for you. 

BASIC statements are stored internally as: 

r-] LL HL LN HN/tokens-and-characters/0 

' ' where LL HL = a pointer to the next line 
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LL= LSB of the address of the next line 

HL= MSB of the address of the next line 

If HL is zero, then this is the end of the program, since BASIC state- f . 

ments would not be in zero page. i I 

LN= LSB of the line number 
HN= MSB of the line number 

tokens-and-characters= the text of the BASIC line after it has been j ( 

tokenized. BASIC keywords, functions, and operators become one 
byte each, ranging between 128 and 255. Characters, such as vari- 
able names and strings, are not tokenized. 
0=end of the BASIC line 

You can examine the address contained here by entering PRINT 
PEEK(43)+PEEK(44)*256 

This pointer can be raised to reserve space for ML or for other 
purposes, for instance, relocating screen or character memory. See 
location 55-56 ($37-$38) for a program to adjust this pointer to 
reserve memory for ML routines. 

A program which will calculate the number of blocks required to 
store a BASIC program on disk, as well as calculate the time it will 
take to save it on tape, takes only a few lines. 

Program 1-3. nsk Space and Tape Time 

10 REM 43 

20 REM THE NUMBER OF BLOCKS REQUIRED TO STORE YOUR 

BASIC PR0GRAM{2 SPACES }0N DISK CAN BE 
30 REM CALCULATED BY: 
40 SZ=(PEEK(45)+PEEK(46)*256)-(PEEK(43)+PEEK(44)*2 

56) 
50 BLKS=INT((SZ/254)+.5) 
60 REM EACH BLK BEGINSWITH A 2-BYTE POINTER TO THE 

NEXT BLOCK 
70 REM TO CALCULATE THE APPROXIMATE SECONDS REQUIR 

ED TO SAVE THE PROGRAM TO TAPE: 
80 SECS=SZ*2/1024*21.5+17 

Be sure to (PEEK(43) + PEEK(44)*256) - 1,0 and issue NEW if [J 

you change this pointer. 

NEW places two bytes of zeros at the location this points to, 
which indicates that no more BASIC lines follow. 

GOTO and GOSUB will start looking for the subject line from 
where this points, unless the subject line is greater than the current 
line number MSB stored in 58 ($3 A). See the search direction dis- i * 

cussion at location 20-21 ($14-15) LINNUM. This is why it's a good LJ 

idea to put your most-used program lines at the top of the program, 
with a GOSUB before them to perform any initialization. If the 
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most-used lines were after several lines of initialization, DATA, and 
REM statements, any backward reference to a line number would 
have to scan them every time. 

SAVE always saves from where this points to, so you can save 
from any location you want by altering this. 

LOAD, if used without ,1 after the device number, causes the 
load to start at the address that this location points to. 

Other BASIC routines also use this pointer to scan the BASIC 
statements to complete their tasks. 

Note: As expansion memory is added to the VIC-20, the power- 
on/reset routines change this pointer to reflect different start-of- 
BASIC locations. See Appendix E for details of the effect that adding 
expansion memory has on this and related pointers, and how to ad- 
just for this in a program. Programs can and should be written to run 
in any standard memory expansion configuration. 

Location 641-642 ($281-282) has a routine that you can use to 
set a VIC-20 back to its unexpanded RAM size, without removing 
any memory boards from the socket. 

See related locations 45 ($2D) through 55 ($37), 641 ($281) and 
643 ($283) for other useful techniques and programs. Appendix B 
includes a diagram of the relationship between these pointers and a 
BASIC program. 

LOAD, without the ,1 after the device number, causes the load 
to start at the address that this location points to. You can use this to 
make a simple append program. It's easy to do but requires that the 
program to be appended has higher line numbers than the program 
to be appended to. Otherwise, you'll have problems changing or 
deleting the appended lines. The program to be appended to is 
loaded first. Then in direct mode enter: 

AT = (PEEK(45) + PEEK(46)*256) - 2 

Since 45 points one byte past the zero link bytes, you can use it to 
find the end of the program. Now enter: 

POKE 251,PEEK(43):POKE 252,PEEK(44) 

in order to save the BASIC start address. Another line: 

POKE 44,INT(AT/256):POKE 43,AT-(PEEK(44)*256) 

will set the start address to the end of the program. (Another way to 
do this would be to enter POKE 43,AT AND 256:POKE 44, AT/ 
256.) Then LOAD the program to be appended. To clean up, enter: 

POKE 43,PEEK(251):POKE 44,PEEK(252) 

which restores the pointer to the start of the first program. Now the 
two programs have been appended. A more sophisticated technique 
that allows intermixing lines based on line number is discussed at 
location 153 ($99). 
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It is possible to recover a BASIC program from an inadvertent 
NEW. An automated technique is discussed in "UnNEW for the VIC 
and 64," by Jim Wilcox, in the June 1983 issue of COMPUTE!. A 
similar program which you can also use with a disk drive was pub- 
lished in the November 1983 issue of COMPUTEI's Gazette in the 
article "VIC/64 Program Lifesaver," by Vem Buis. 
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4S-46 $2D-2E VARTAB 

(handy location) 
Pointer to the end of BASIC program, start of variables^ 

Scalar (nonarray) variables are built in this area, from where this 
pointer is set, to increasing addresses. String variables are not stored 
in this area, but their descriptors are. See location 51 ($33) for 
information regarding string storage and 47 ($2F) for arrays. 

See 187 ($BB) for a method of pointing a string descriptor to any 
characters in memory, rather than BASIC'S string pool. The format of 
variables is discussed in Appendix B. 

This pointer is also useful for finding the end of a BASIC pro- 
gram since it points to the byte past the 0,0 end-of-program link. 

After an array has been defined, it is stored above the area used 
for scalar variables. When creating variables in this environment, all 
arrays must be moved up seven bytes, the length of all scalar vari- 
ables or descriptors, to accommodate the new variable. For this rea- 
son, it's often suggested that variables be defined before arrays, and 
that it's better to define variables that never get used than to move 
up large arrays. If you're concerned about conserving memory, you 
may want to simply predefine only as many used variables as pos- 
sible. Remember that once a variable is defined, it takes up memory 
space until you use a CLR command. 

Defining variables in the order of their frequency of use is also 
often suggested, since the variable locator and builder routine 
GETPTR starts at the bottom of variable storage and works upward. 
If the variable f is used the most, yet defined last, all other scalar 
nonstring variables and functions have to be scanned every time F is 
referenced. You may find it convenient to define variables in alpha- 
betical order, instead. This makes it easy to tell if a variable name j j 
has already been used, even if you look at the program much later. 

See location 47-48 ($2F-30), the array pointer, for more 
explanation of this. i ~i 

Memory expansion indirectly affects this pointer, since the start ' — ' 

of the BASIC program moves. Appendix E has details. 

CLR, NEW, RUN, LOAD, or the addition or modification of a t n 

BASIC statement resets this pointer to one byte past the end of the 1 I 

BASIC program, effectively making any variables inaccessible. See 
the description of the workings of CLR at location 50782 ($C65E). 
Any existing higher numbered statements have to be moved up in | | 
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the program storage area when a statement is added or lengthened. 
The BASIC MAKSPC routine opens a space for the new BASIC 
statement by moving up higher numbered lines with the MOVEBL 
routme at 50111 ($C3BF). 

SAVE uses this pointer as the last byte+1 to save to the output 
device. 
r^ LOAD resets this pointer to 1 past the end of the loaded pro- 

gram, unless issued wdthin the program. This allows the variables to 
be shared by the shorter LOADed program. 

See "The Enhanced VIC-20: Adding a Reset Switch," by Joel 
Swank, in the February 1983 issue of BYTE for a description of an 
ML routine to restore this pointer after a RESET has been triggered. 

By ending any larger program with a LOAD command for the 
following routine, you'll see a map of the order in which the 
nonarray variables were defined, as well as their addresses. You 
could use this map to find the variable names and their addresses 
within your own programs. 

Program 1-4. Nonarraf Variable Names and Addresses 

P0=5:P%=5:P$="W":DEFFNP(C)=234 

1 PRINT"VARNAME ADDR" 

2 PRINT" " 

5 QQ=0 : REM END MARKER 

10 VS=PEEK(45)+PEEK(46)*256:VE=(PEEK(47)+PEEK(48)* 

256)-22 
15 F0RX=VST0VESTEP7 
20 X%=PEEK(X)AND128:Y%=PEEK(X+1)AND128:X1$=CHR$(PE 

EK(X)AND127) 
25 Y1$=CHR$(PEEK(X+1)AND 127) 
30 PRINTX1$;Y1$; 

40 IFX%ANDY%THENPRINT"%{4 SPACES} "; :GOTO80 
50 IF(N0TX%)ANDY%THENPRINT"${4 SPACES} "; :GOTO80 
60 IFX%AND(NOTY%)THENPRINT"(FN) ";:GOTO80 
70 IF(N0TX%)AND(N0TY%)THENPRINT"{5 SPACES}"; 
80 IFASC(Y1$)=0THENPRINT" "; 

90 PRINTX:NEXT:PRINT"{RVS}{2 SPACES } USED="VE-VS+1 : 
1—1 END 

47-48 $2F-30 ARYTAB 

r~| (handy location) 

Pointer to the end of BASIC variables, start of arrays. 

Arrays are built from low to high memory, starting from where 
n this pointer indicates. See the description of the move-up problem at 

location 45 ($2D). 

Just as in locations 45-46, CLR, NEW, RUN, LOAD, or the 
('~*l addition or modification of a BASIC statement resets this pointer to 
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one byte past the end of the BASIC program, making the variables 
inaccessible. See the description of the workings of CLR at location 
50782 ($C65E). 

Again, Appendix B describes in detail the format of the array 
variables, and Appendix E shows the indirect effect on this pointer 
by memory expansion. 

String arrays consist of a three-byte descriptor for each element 
in the array. The string itself is stored in the area pointed to by 51 
($33). 

Remember that the zero element of an array exists, takes up 
space, and may be used. 

To see a map of the order in which the variables were defined, 
and their addresses, LOAD the following routine at the end of a 
larger program. As with Program 1-4, you can use this to locate the 
array names and sizes within your own programs. 

ftogiam 1-5. Array Names, Addresses, and Sizes 

DIMI6 (5,4,3),I%(8,9),P$(2):E(8)=9 

1 AE=0:AS=0:X=0:Y=0sZ=0:Xl$="":Yl$="":AL=0:X%=0:Y% 
=0 

2 PRINT" " 

3 PRINT" ADDR ARRAY" 

4 PRINT" " 

10 AS=PEEK(47)+PEEK(48)*256:AE=(PEEK(49)+PEEK(50)* 
256)-l:X=AS 

18 X=X+AL : IFX+1 >PEEK ( 49 ) +PEEK ( 50 ) * 256THENPRINT " 
{RVS } { 2 SPACES }USED="AE-AS+1 : END 

19 PRINTX; 

20 X%=PEEK(X)AND128:Y%=PEEK(X+1)AND128:X1$=CHR$(PE 
EK(X)AND127) 

25 Y1$=CHR$ ( PEEK (X+1) AND 127) 

30 PRINTX1$;Y1$; 

40 IFX%ANDY%THENPRINT"%"; :GOTO60 

50 IF(NOTX%)ANDY%THENPRINT"$"; 

60 PRINT"("; :FORY=PEEK(X+4)*2T01STEP-2:Z=(PEEK(X+4 

+Y)+PEEK(X+3+Y)*256)-l 
62 PRINTMID$(STR$(Z),2,3)", "; 

70 NEXT: PRINT" {LEFT})" 

80 AL=PEEK(X+2)+PEEK(X+3)*256 

90 G0T018 



49-SO $31-32 

(hmdy location) 
Pointer to the end of BASIC arrays, start of free area. 

Array or scalar nonstring variable definitions, as well as addi- 
tional BASIC program lines, move this pointer upwards. 
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When storage for a string is allocated, starting at 51 ($33) and 
pointing down in memory, garbage collection is performed if the 
string begins before the location of the pointer. 

FRE performs garbage collection and returns the value difference 
between this pointer and 51 ($33). 

The BASIC routine MAKSPC at 50104 ($C3B8) pushes memory 
contents upward to create room for additional or lengthened BASIC 
lines or scalar variables. 

The commands CLR, NEW, RUN, LOAD, or the addition or 
modification of a BASIC statement resets this pointer to one byte 
past the end of the program. 

To calculate the free memory remaining without causing a gar- 
bage collection, you could use the following statement. If the amount 
of memory available is insufficient, you can use the FRE command 
to discard unneeded strings. 

FREE=( PEEK( 51)+PEEK( 52 ) *256 ) - ( PEEK(49 ) +PEEK( 50 ) *25 
6) 

S1-S2 $33-34 FRETOP 

(handy location) 
Pointer to the bottom of BASIC active string. 

This pointer marks the bottom of the active strings and the top 
of available free space. Strings are built from where 51 ($33) points, 
downward in memory addresses. 

When finding space for a new string, the string routines begin 
looking at the location this pointer indicates and look downward. 
Then this pointer changes to indicate the beginning of the added 
string. 

FRE and garbage collection routines readjust this pointer 
upwards. See the explanation of garbage collection at location 54566 
($D526). 

Power-on/reset routines set this to the top of available RAM, 
but CLR copies the pointer at location 55 ($37). 

53-S4 $35-36 FRESPC 

Pointer to the most current string added or moved. 

Used as a temporary pointer by string building or moving 
routines. 

SS-Si6 $37-38 IffillSIZ 0/30 ($0/lE) 

(handy location) 
Pointer to the end of BASIC memory. 

Power-on/reset routines set this pointer to the top of available 
RAM. 
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This pointer is decreased by 512 bytes when an RS-232 channel ' — * 
is opened to create two 256-byte buffers for input/output. A CLR is 
then issued. The pointer at location 643 ($283) which points to the 
top of user RAM is also lowered by 512 bytes (Note: This may destroy {_J 
any high RAM resident ML code), making it necessary to open the RS- 
232 port (device 2) before defining any variables. 

You can lower this pointer to reserve space for ML or any other j j 

purpose, such as relocating screen or character memory. After chang- 
ing this pointer, enter a CLR which copies this pointer into location 
51 ($33), preventing BASIC from using RAM above the pointer's 
indication. 

Here's a program that reserves space at the bottom and/or top 
of BASIC. It first displays the range of BASIC and the amount of 
space included. Prompts for the amount of space to be reserved 
should be answered with or the desired amount. The new range 
for BASIC and the size will then be displayed. A NEW is issued for 
you, and placed in the byte before the start of BASIC. 

Progiam I-S. Reserving Space 

100 BWAS = PEEK (44) *256 + PEEK(43) 

H0 EWAS = PEEK (56) *256 + PEEK(5J) ^ /^ 

120 PRINT "{CLR} BASIC ="BWAS"TO"EWAS"="EWAS-BWAS 

.130 PRINT "RESERVE AT BOT" : INPUT BRSRV C 

140 PRINT "RESERVE AT TOP" : INPUT ERSRV 

150 BAFTER = BWAS^+ BRSRV "^ 

160 EAFTER = EWAS^- ERSRV ^ <i^ >t 

I70iBMSB = INT( BAFTER / 256 ) : BLSB = BAFTER - 3 

-USB * 256 ^- f/ ;: 

180^EMSB = INT( EAFTER / 256 ) : ELSB = EAFTER - E 

MSB * 256 F ^ r r ^ 

190 PRINT "NEW ="BAFTER"TO"EAFTER"="EAFTER-BAFTER 
200 POKE 198,4 :POKE 631,78 : POKE632,69 :POKE633, 

87 : POKE 634,13 
210 POKE 44,BMSB :POKE 43, BLSB : POKE 56,EMSB :POKE 

55, ELSB :POKEB AFTER- 1,0 :END 

If an RS-232 device is to be opened in the BASIC program or in 
ML placed high in RAM, see the note at location 643 ($283). 

Location 641-642 ($281-282) has a routine that you can use to 
set a VIC-20 back to its unexpanded RAM memory, without remov- 
ing any memory boards from the socket. 

See Appendix E for details of the effect that adding expansion 
memory has on this pointer, related pointers, and how to use these 
techniques in your own programs. It's a good idea to write your pro- 
grams so that they will run in any standard memory expansion 
configuration; refer to Appendix E for an explanation of this. 
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$39-3A CURLIN 

(handy location) 
Line number of the BASIC statement being executed, in LSB/ 
MSB format. 

A 255 ($FF) in location 58 ($39), which would set the line num- 
ber above the 63999 limit, indicates a direct mode statement or that 
editing of program lines is taking place. The routine MAIN sets loca- 
tion 58 ($3A) to 255 ($FF) when input from the keyboard is received. 

The main BASIC execution routine NEWSTT updates this loca- 
tion as a new BASIC line is taken for execution. 

Illegal BASIC keywords in direct mode check location 58 ($3A) 
to see if the direct mode is active. 

BREAK and any error messages show the contents of this loca- 
tion as the number of the line being executed, unless it's an OUT OF 
DATA message, in which case the contents of location 63-64 {$3F- 
40), the current DATA line, are displayed. 

The values in these locations are copied to address 59 ($3B) by 
the STOP and END commands, as well as when the RUN/STOP 
key is pressed. The command CONT moves 59 ($3B), the previous 
line number, back to here if 62 ($3E) is not zero. This indicates it is 
not a syntax error. GOTO uses this to determine how to search for 
its target line. 

FOR and GOSUB stack tiiis for NEXT and RETURN. 

You can trace program execution, displa)dng this line number, 
by diverting the 776 ($308) vector. 

See 61 ($3D) for the address of the current line. 

The routine below shows how a trace can be used to display the 
area of the program being executed, vdth a switch to qviickly disable 
the function. 

Progfam 1-7. Trace 

10 REM 57 

20 REM A TRACE ROUTINE CAN DISPLAY THIS LOCATION. 

30 REM BY TESTING A VARIABLE IN THE ROUTINE (LINE 

{SPACE} 90) THE TRACE CAN BE DISABLED. 
35 REM THIS IS SUPERIOR TO PRINTING A CONSTANT TIT 

LE AT THE START OF A ROUTINE. 
40 TRACE=I:Z=57:DEFFNL(T)=PEEK(T)+PEEK(T+1)*256 
50 T=FNL(Z):T$="INITIALIZING":GOSUB90 
55 REM STATEMENTS IN THE ROUTINE 
60 T=FNL(Z):T$="MENU SETUP" :GOSUB90 
65 REM STATEMENTS IN THE ROUTINE 



I — I 

f 1 70 T=FNL(Z):T$="ROUTER":GOSUB90 

75 REM STATEMENTS IN THE ROUTINE 

80 T=FNL(Z) :T$="READDATA":GOSUB90 

85 REM STATEMENTS IN THE ROUTINE 
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89 END 

90 IP TRACE THEN PRINT" {RVS}@L1NE"T;T$ 
95 RETURN 



U 
U 

u 
u 

$3B-3G nDUN 

(possible user )_J 

storage) 
Previous BASIC line number executed, in LSB/MSB form. 

You may use this location, but keep in mind that END, STOP, 
and the RUN/STOP key all copy the value in location 57 ($39) to 
these addresses to save the current line number for a possible 
CONT. CONT returns the value to location 57 ($39). 

61-62 S3D-3E 6LDTXT 

(handy location) 
Saves TXTPTR pointer of statement being executed, for GOI^» 

Not to be confused with the BASIC line number, this is the 
address of the end byte of the BASIC statement that was just exe- 
cuted. NEWSTT saves TXTPTR here when executing a new BASIC 
statement. 

TXTPTR is the pointer to the character being scanned. See loca- 
tions 115-138 ($73-8A), which are the CHRGET routine. 

END saves TXTPTR here and CONT restores from here. How- 
ever, CONT won't continue if 62 ($3E) is set to zero by a clear rou- 
tine, the LOAD command, program modifications, or error routines. 

An ML tracer could print each BASIC statement before it exe- 
cutes by intercepting the indirect vector at 776 ($308) — (a colon in .A 
means new statement; otherwise, new line) — detokenizing with 
QPLOP, and continuing with the original value of 776 ($308). 

See location 57 ($39) for the achial BASIC line number. 



$3F-46 DiVTLIN 

Current DATA line number in LSB/MSB form. 

This location is not used by the read routines to select the line to 
read data from. It is informational only. 

READ routines keep this pointer current. If a problem with a 
DATA statement occurs, this line number is included in the error 
message by moving it to location 57 ($39). Remember that this loca- 
tion is the standard line number for the error routines. 

You can use the following technique to display the line number 
of the DATA statement currently being processed by a READ com- 
mand. This can be of help to you when you're debugging a program, 
for you can insure that the proper DATA values are loaded and 
used. 
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Program 1-8. DATA-KAD Review 



,>-, 10 REM 63 

I I 20 REM DISPLAYS THE LINE NUMBER OF DATA BEING READ 

30 READ X$ : PRINT "{RVS) DATA AT"PEEK(63)+PEEK(64)*25 
6 
pi 40 IFX$<>"Z"THEN30 
' ' 45 END 

50 DATA{3 SPACES }A,B,C,D 

60 DATA13 SPACES}E,F,G,H 

70 DATA{3 SPACES}I/J.K,L 

80 DATA{3 SPACES}M,N,0,P 

90 DATA{3 SPACES}Q,R,S,T 

100 DATA{3 SPACES }U,V,W,X 

110 DATA {3 SPACES }Y,Z 

65-66 $41-42 DATPTR 

Pointer to the current BASIC data item. 

The READ routine uses this location and location 67 ($43) to 
track where it is currently reading data. Also see 75 ($4B). 

RESTORE or CLR resets this pointer to the location the pointer 
at 43 ($2B) indicates, the beginrung of the BASIC program. See the 
description of the workings of CLR at location 50782 ($C65E). 

67-68 $43-44 INPPTR 

Pointer to source of INPUT, GET, and READ information. 

A common pointer for all sources of incoming information, 
whether from the BASIC input text buffer at 512 ($200) or DATA 
statements. Also see location 75 ($4B). 



69-70 $45-46 

(handy location) 
Current BASIC variable name with type flags. 

Two characters are stored here, the second a if the variable 
has only a one-character name. Dollar and percent signs are not 
saved as part of the name. 

The high order bit of each character indicates the type of vari- 
able. They are: 

Floating point: no high bits on 

Integer: both characters have high bit on (128 is added) 
String: second character has high bit on (128 is added) 
Function: first character has high bit on (128 is added) 

Also see locations 13 ($D) and 14 ($E). 

Appendix B has a description of the variable formats in storage. 
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71-72 $47-48 

(handy location) 
Pointer to the descriptor of the current BASIC variable. 

This points to the byte just after the two-character name in the 
variable descriptor. 

The FN routines alter this pointer so that the dependent variable 
is not changed while the function is performed. For example, when 
DEF FNA(B)=B/60:X=FNA(Y) is entered, the dependent variable B 
must be protected from change. This pointer is changed by the FN 
processing to reference an area in the FN descriptor rather than the 
variable B. The area is initialized to the value of variable Y, divided 
by 60, because of the given FN equation, and then assigned to the 
variable X. B was never changed. 

See Appendix B for the format of variable descriptors. 

See 95 ($5F), the pointer to the start of the variable descriptor 
used after locating or creating the variable. 

The following routine shows a method of determining the 
address of any BASIC variable descriptor. Once the address of AV$ 
has been found, the routine modifies the descriptor to point to an 
error message string within BASIC ROM. You can use this same 
technique in modif5n[ng descriptors for your own purposes. BV is also 
modified in this routine to contain the number of the program line it 
searched for. 

Program 1-9. Variable Descriptor 

100 REM 71 

110 REM ROUTINE TO FIND THE ADDRESS OF THE CURRENT 

VARIABLE DESCRIPTOR 
120 REM REFERNCE THE VARIABLE BY SETTING{2 SPACES} 

TO ITSELF, SUBROUTINE RETURNS THE VARIABLE 
130 REM ADDRESS IN VA. 
140 AV$="TEST STRING" 
150 AV$=AV$:GOSUB220:PR1NT"AV$@"VA"{RVS}NOW="; : POK 

EVA+2 , 14 : POKEVA+3 ,158: POKEVA+4 ,193 
160 PRINT"' "AV$"' ERR MSG . " 
170 BV%=BV%:GOSUB220:PRINT"BV%@"VA: POKEVA+3, PEEK( 5 I I 

7):POKEVA+2,PEEK(58) '— ' 

180 PRINT" {RVS}NOW= MY LINE NUMBER OF"BV% 
190 CV=CV:GOSUB220:PRINT"CV@"VA , , 

200 CV(4)=CV(4):GOSUB220:PRINT"DIM CV BEGINS @"VA 1 I 

210 END 

220 POKE251,PEEK(71) :POKE252,PEEK(72) :VA=PEEK(251) 

+PEEK( 252 ) *256-2 : RETURN 
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75-76 



78-74 $49-4A FORPNT 

Pointer to BASIC variable used in FOR loop. 

These locations are also used by many routines for other 
purposes. 

FOR saves the address of the dependent variable here, then 
pushes the following onto the stack in this order: 

• Address of the return line statement 

• The return line number, TO value 

• STEP sign, STEP value, this pointer, and a constant value 129 
($81). 

See the description of the stack area at location 256 ($100). 

FOR also uses locations 73-74 to save the result of each STEP 
increment/decrement stored in the dependent variable area. For 
example, FOR C=l TO 10 STEP 2. 

This location is later used by the BASIC routine SCNSTK to find 
the proper FOR loop values when NEXT is encountered, since NEXT 
can include variable names. If 74 ($4A) is set to ($0), the first FOR 
information found on the stack will be used. This occurs when 
NEXT doesn't specify a variable name. For example, NEXT C has to 
locate the proper stack items for the FOR C= loop, ignoring any 
others. 

Other routine usage of this location: 

• READ/INPUT/GET use this location to point to the variable 
to assign the value to. It is also used as a temporary area for the 
evaluated value of the subject variable during assignment (for exam- 
ple, S=16*(17/3)), or the string pointer for something like 
S$=A$+"ABC". 

• LIST uses 73 ($49) as a temporary save area. 

• WAIT uses 73 ($49) to save its second parameter and 74 ($4A) 
for the third, or zero, default. 

• CLOSE uses 73 ($49) to save the fUe number. 

• LOAD and SAVE use this location to save the device number. 

• RETURN uses 74 ($4A) as a flag, set to 255 ($FF), to pull the 
associated GOSUB entry off the stack. 

Other routines can use this area without affecting FOR because 
all needed information is now stored on the stack. 

75-76 $4B-4G OPPTR 

Math operator displacement/INPUT TXTPTR. 

These locations serve as the displacement of the current math 
operator in a table during formula evaluation. The math operator 
table is at location 49280 ($C080). 
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This location is yet another save area for TXTPTR by the READ, 
INPUT, and GET commands; these are the original contents before 
they are altered by READ, INPUT, or GET. 

77 $4D OPMASK 

Comparison desired mask. 

This location's value is created by the expression evaluator rou- 
tine FRMVL. A value of 1 indicates a greater-than check, 2 signifies 
an equals check, and 4 flags a less-than check. They may be used in 
combination by adding the values. 

See also location 18 ($12). 

78-79 $4E-4F DEFPNT 

Pointer to current FN descriptor in variable storage. 

DEF FN uses this location as a pointer to the descriptor created. 
During FN, this is a pointer to the FN descriptor used to save the 
evaluation results. This is also a work pointer for garbage collection. 

8IMU $S0-S1 DSGPTN 

Pointer to the current string descriptor. 

This location is used and set by the string assignment and han- 
dling routines. Location 82 ($52) is related to this location. 



Length of the current BASIC string. 

See location 80 ($50). 
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Constant, set at either 3 or 7, for garbage collection. 

Used to instruct garbage collection routines whether a three- or 
seven-byte string descriptor is being collected. 

84-86 $54-56 JMPER 

Jump opcode and vector to function routine. 

The 6502 ML jump operation code is 76 ($4C), followed by the 
address of the required function from the function vector table at 
49234 ($C052). This is determined by the expression evaluation 
routines. 

85 ($55) is also used as a one-byte work area for garbage collec- 
tion and stiing substiinging, such as with the LEFT$, R1GHT$, and ^ 
MID$ commands. Location 86 ($56) is used as a one-byte work area [_J 
for addition and exponentiation rounding. 
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97-102 



87-96 $S7-60 TEMPF3 

BASIC numeric work area. 

Another busy work area for BASIC. Becaiose so many BASIC 
routines use and overlay this area, none of it can be assumed to con- 
tain any specific data at any one time. 

• 95 ($5F) is a pointer to the variable's seven-byte descriptor, after 
location or creation of the variable. 

• 95-96 ($5F-60) is used by LIST as a pointer through the 
BASIC program as it lists it. 

• 95 ($5F) is used as a flag to indicate that a decimal point has al- 
ready been found when converting a string to a floating point number. 
For example, VAL( -I- 123.456). 

The garbage collection routines at 54566 ($D526) GRBCOL use 
this area for temporary string pointers and length counters. 
Also see location 71 ($47). 



97-102 $61-66 

(handy location) 
BASIC floating point accumulator one. 

Appendix B has a fuU description of each of the floating point 
acctunulators, as well as an explanation of floating point numbers 
and conversion from/to integer format. 

• 97 $61 FACEXP 
Exponent of the value + 128. 

• 98-101 $62-65 FACHO 
Normalized mantissa of the value. 

• 102 $66 FACSGN 

Sign: O=positive, 128-255 ($80-FF)=negative 

These locations are used by BASIC routines to perform any 
mathematical processes called for by the user or by BASIC itself. 
Integer numbers are converted to floating point before any computa- 
tions are made, then converted back to integer if needed. Strings 
may be converted to floating point and vice versa. 

Conversion to/from floating point is a rather involved subject to 
master. Fortunately, the V1C-20 includes many efficient routines for 
this process. See FAC and FAC2 in the label cross-reference index in 
the appendices. 

Other uses of this area include: 

• For two-byte integer to floating conversion, locations 98 ($62) 
and 99 ($63) are filled with the integer number, the exponent is set 
to 136 ($88) or 144 ($90), part of the SGN routine initializes the rest 
of FAC, and the ADD routine normalizes and converts. String 
processing routines use this location to process the string descriptor, 
with 100-101 ($64-65) being the descriptor address. 
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• The formula/expression evaluation routine at location 52638 
($CD9E) stores its results in this location in the form of a floating 

point number or a pointer to a string. I I 

• LIST uses this location to convert integer line numbers to 
floating point. 

• A variety of other routines use this location as a work area. ; i 
The floating point accumulators and the BASIC routines that use * — ' 

them for mathematical operations can be used in your own ML 
routines to perform the BASIC operations. You can do this by storing 
the operands in the appropriate accumulators, either directly or as 
the result of calling integer to floating point conversion routines. You 
would then branch to the desired BASIC ROM routine. The format 
of the floating point numbers is discussed in more detail in Appen- 
dix B. 

The following assembler instructions can be entered to use the 
BASIC routines in your own ML routines: 

• To convert an integer to floating point in FAC, you would 
load the Least Significant Byte (LSB) in the Y register, load the Most 
Significant Byte (MSB) in the Accumulator, and jump to location 
$D391. 

• To load FAC from memory location 828 (the start of the tape 
buffer), you need to load the Y register with the number value of 
location $3, load the Accumulator with the number value found in 
location $3C, and jump to location $DBA2. 

• Loading FAC2 from location 828 is identical to the process 
used to load FAC, except that the jump should be to location 
$DA8C. 

• To move FAC2 to FAC, you only need to jump to location 
$DBF6. 

• To move FAC to FAC2, jump to location $DCOC. 

• Storing FAC at any memory location can be done by loading 
the X register with the MSB, the Y register with the LSB, and then 
jumping to location $DBD7. 

• To store FAC2 at any location is a bit more involved. You 
need to LOAD the Accumulator with the MSB of the address, store 
the Accumulator at location $49, LOAD the Accumulator with LSB 
of the address, store the Accumulator at location $74, and finally 
jump to location $DBC7. 

• To use addition, you simply jump to location $D86A. The first 
value is placed in FAC, the second in FAC2, and the final result is 
stored in FAC. 

• Jumping to location $D853 will give you subtraction. The sec- 
ond value, stored in FAC2, is subtracted from the first value, found 
in FAC. The resulting value is stored in FAC. 

• To use multiplication, jump to location $DA28. The values in 
FAC and FAC2 are multiplied and the final result is stored in FAC. 
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• To use division, jump to $DB12. The value stored in FAC2 is 
divided by the value found in FAC. The result is stored in FAC. 

• Exponentiation can be used by jumping to location $DF7B. 
The value in FAC2 is raised by the value in FAC, and the result is 
found in FAC. 

j— I • Various trigonometry functions can be used as well. However, 

' ' these operations use FAC only. SIN can be used by jumping to loca- 

tion $E268; TAN can be used by jumping to location $E2B1; and 
COS can be used by jumping to location $E261. 

• Converting FAC to an ASCII string at location $100 (until a 
$00 value is found) is done by jumping to location $DDDD. 

• Converting FAC to an integer at locations $64-65 is accom- 
plished by jumping to location $D1AA. 



103 $67 

BASIC series evaluation number of items. 

This location is used by the mathematical formula evaluation 
routine to indicate the number of evaluations to be done. A complex 
formula may need several levels of evaluation of terms before the 
final result can be determined. This location contains the number of 
terms to be resolved. 

Occasionally, this location serves as temporary storage for the 
sign of FAC. 



104 $68 

High order FAC propagation word. Overflow. 

Overflow work area byte resulting from normalization of FAC 
when a floating point number is being constructed. 



IOS-110 $68-6E 

(handy location) 
BASIC floating point accumulator two. 

Appendbc B has a full description of each of the floating point 
accumulators, as well as an explanation of floating point numbers 
l\ and conversion. 

• 105 $69 ARGEXP 
Exponent of the value -I- 128 

il • 106-109 $6A-6D ARGHO 

Normalized mantissa of the value 

• 110 $6E ARGSGN 

n Sign: O=positive, 128-255 ($80-FF)=negative 

' These locations are used by BASIC routines to perform any 

mathematical processes that involve more than one value, such as 
!—) add, subtract, multiply, divide, and so on. Typical is the divide rou- 

' ' tine which divides FAC by FAC2 and leaves the result in FAC. See 

n 
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Ul $6F ARISGN 

FAC to FAC2 sign comparison. 1 | 

This is used to indicate the difference or likeness of signs. in 
this address means FAC and FAC2 have same sign, while a value of 
225 ($FF) means their signs are different. 

Along with locations 112-114 ($70-72), this address is used as a 
work area for string handling routines. Locations 111-112 ($6F-$70) 
are also used as a pointer to a string. 



Ill 



the description at the end of the explanation for locations 97-102 
($61-66). 

These are also used in the normalization process of FAC, 
comparing numerics, and formula evaluation. 



m $70 

Low order of FAC mantissa for roun^ng. 

With location 111 ($6F), this location is used by string handlers 
as a pointer to string. 

U8-U4 $71-72 FBUFPT 

Series evaluation pointer. 

This is a pointer to the table of constants for the trigonometric 
function being evaluated by the formula evaluation routines. For 
this, the location will point somewhere within the tables starting at 
58171 ($E33B), 55745 ($D9C1), 57284 ($DFC4), or 58092 ($E2EC). 
See the tables at these locations for further information. 

The pointer is also used for saved TXTPTR for READ, GET, 
INPUT, and VAL; index to the end of the BASIC line in the BASIC 
text buffer at 512 ($200) during tokenization by CRNCH; string 
setup pointer; TI$ assignment work area; and the work area for the 
building of an array descriptor. 

It's also described in various notes as the tape buffer pointer, 
but I've found no reference to it for that specific purpose. See 178 
($B2) for the tape buffer pointer. 

llS-138 $73-8A GBRGET ^ 

(handy location) 
Get-BAStC-character routine,j r i 

This routine is used to scan BASIC lines or any other area that a 
calling routine desires by setting TXTPTR. Either the next character 

or the current character can be retrieved, depending on the entry < i 

point used. This routine, when entered from CHRGET, increments >— ' 
TXTPTR to point to the next possible location of a character. Notice 

that this is accomplished by modifying the operand of its own LDA . , 

(LoaD the Accumulator) instruction. Upon entering at CHRGOT or U 
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falling through from the previous instruction, the routine skips 
spaces, sets flags to indicate the type of character TXTPTR is point- 
ing at, and returns to the calling routine with the retrieved character 
in .A, the accumulator. 

This sequence of instructions is copied from CGIMAG at loca- 
tion 58247 ($E387) to page at power-on/reset, or at BASIC cold 
start, so that the routine runs faster, can modify its TXTPTR, and to 
allow the wedging-in of user routines. The coppng of this ROM to 
page is done by the routine INITBA at location 58276 ($E3A4). 

When a new BASIC line is retrieved from BASIC program stor- 
age for execution, NEWSTT processes the line number and link 
addresses before using CHRGET to find tokens and ASCII 
characters. 

The .A register holds the character at exit. 

Processor status flags at exit are: 

Carry Clear if digit 

Carry Set if not digit 

Zero Set if $00 (end-of-line) or $3A (colon) 

Zero Clear if any other character 

Negative Clear if the value is between $00 and $B9 

Negative Set if the value is between $BA and $FF 

Overflow Set if colon and Overflow was previously set 

Overflow Clear otherwise 

Since this is such an important routine, a disassembly listing is 
provided below to give you a better understanding of how it works. 



115 


$73 


CHRGET 


INC 


$7A 


;increment TXTPTR LSB 


117 


$75 




BNE 


$79 


;if LSB not 0, then skip 
;next 


119 


%77 




INC 


$7B 


;increment TXTPTR MSB 
;byte 


121 


$79 


CHRGOT 


LDA 


TXiPTR 


;Ioad byte from where 
;TXTPTR points 
;if $7B = 02 then direct 
;mode statement 


124 


$7C 


CHRIST 


CMP 


#$3A 


;if > 57 $39 (char 9) then 
;carry set 


126 


$7E 




BCS 


$8A 


;and exit 


128 


$80 




CMP 


#$20 


;if space, ignore it and 


130 


$82 




BEQ 


$73 


;get the next character 


132 


$84 




SEC 






133 


$85 




SBC 


#$30 


;if 48-57 $30-39 then digit, 
;carry clear 


135 


$87 




SEC 






136 


$88 




SBC 


#$D0 


;if < 48 $30 (char 0) then 
;carry set 


138 


$8A 




RTS 




;carry clear if 0-9, else 
;carry set 



31 



ns-138 



u 
u 
u 



A wedge can be inserted in CHRGET/CHRGOT to intercept the 
interpretation of BASIC ke5rwords or ASCII characters. Since the 
locations 122-123 ($7A-7B) are referenced by ROM BASIC routines, | I 

you should not change TXTPTR to another location. One wedge ' — ' 

insertion technique is to place a JMP opcode in 115 ($73) and the 
address of your wedge in 116-117 ($74-75). Your wedge should , i 

immediately JSR to 118 ($76), which you'd have changed to a JSR to U 

location 58247 ($E387), the ROM master copy of this routine. The 
ROM copy will increment $7A and $7B for you and test the charac- 
ter in location $EA60. That address is frozen in the ROM version of 
the $79 LDA instruction. The flags can be ignored. The RTS in the 
ROM copy will return to the RAM CHRGET, which then tests the 
chosen character TXTPTR is pointing to. Your wedge is reentered via 
the RTS in the RAM CHRGET routine. Your wedge can process the 
character before BASIC sees it. You can go back to BASIC with JMP 
$79 to reset the status flags using CHRGOT, or get the next charac- 
ter with JSR $76. 

For example: 

CHRGET $73 JMP $4000 ;branch to my wedge 

$76 JSR $E387 ;perform the ROM copy of routine 

The rest of the routine is left as is. The first instruction in my wedge 
should be JSR $76. 

Another technique for wedging into CHRGET is to place the 
JMP to your routine at $73-75, then in your wedge routine 
increment TXTPTR. A JSR $79 lets the CHRGET routine do its nor- 
mal testing. When CHRGET issues RTS, your routine is reentered, 
and can decide to process and then jump 0MP) to $73 or let BASIC 
have it by using a JMP $79. 

A wedge can be placed in the CHRGOT routine by replacing the 
CMP at location $7C with a JMP to your wedge. This can then jump 
to the ROM copy of the $7C CMP at location 58256 ($E390) after 
your wedge determines if it wants the character. The ROM routine 
RTS will return to the original routine. If your wedge processes the 
character, you would JMP to $73 or $79. 

CLR, NEW, and power-on/reset set TXTPTR back to the start of jj 

the BASIC program. 

Here's an example of a wedge program for you to examine, type 
in, and use. It features single keystroke entry of BASIC keywords 
and automatic detection of the quote mode so that strings within 
quotes are left alone. It immediately displays the entire word on the 
screen. The program uses the Commodore key to indicate that the , 
key pressed along with it is a shorthand entry. I | 

You can change the second 2 in line 130 to 4 if you want to use 
the CTRL key instead of the Commodore key for this shorthand 
entry. I j 
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The program works with any memory configuration. The loader 
relocates the ML routine at the top of memory and protects it from 
BASIC. When the program requests the memory address, simply 
press the RETURN key. To toggle it off/on, you can SYS 
PEEK(253)*256. The function keys have been defined as direct mode 
keywords, the space bar as LIST, and other keys can be pressed to 
see which keywords each represents. 

Pio^am l-IO. Wtedge 

3 REM USE C= KEY AND OTHER KEYS FOR BASIC KEYWORDS 
5 REM ** WARNING, DO NOT RENUMBER LINES ** 

9 PRINT" {CLR}" 

10 PRINT "{RVS} BUILD MLC WHERE? 0=TOP{OFF} " :OPEN1,0 
: INFUTfl , S$ : S=VAL (S$ ) tCLOSEl 

20 L=256:LN=100 

30 E=PEEK(56)*256+PEEK(55) 

33 IFS=0THENS=E-L 

35 P=INT(S/256):S=P*256 

37 IFS<4096ANDE>7680THEN50 

40 IFS<ETHENPOKE56,P:POKE55,0 

50 PRINT "BUILDING. . . " :F0RI=ST0S+9999:READA:IFA=888 

THEN900 
55 IFA=999THEN90 
60 CK=CK+A:IFA=300THENA=P 
70 IFA<0THENA=ABS(A) 
80 POKEI,A 
85 NEXT 

90 RESTORE : READA: IFPEEK( S ) < >ATHENPRINT " { RVS } POKED 
{SPACElTO ROM, RELOAD. {OFF} " :FORX=1TO300:NEXTX: 
RUN 10 
95 PRINT " SYS "S "TO TOGGLE. " :POKE253 , P:NEW 
100 DATA120, 173, 20, 3, 72, 173, 21, 3, 72, 173, -39, 300, 20 

8,2,169,-41,888,1429 
110 DATA141 , 20, 3 , 173 , -40, 300, 208, 2 , 169 , 300, 141 , 21 , 

3 , 104, 141 , -40, 888, 1646 
120 DATA300, 104, 141, -39, 300, 88, 96, 0,0, 72, 138, 72, 15 

2,72,234,234,888,1964 
130 DATA234, 234, 165 , 212 , 208, 17 , 173 ,141,2, 201 , 2, 208 

,10,165,203,201,888,2376 
140 DATA64, 176 , 4, 76 , -156 , 300 , 234 , 165 , 203 , 72 , 76 , -14 

1,300,0,234,76,888,1683 
150 DATA-147, 300, 138, 24, 105 , 158, 133 , 34, 144, 8, 160, 1 

93,132,35,144,6,888,1567 
160 DATA176, 4, 160, 192, 132, 35, 160, 0,162, 0,132, 198,1 

77,34,48,12,888,1622 
170 DATA200, 230, 198, 166, 198, 157, 119, 2, 176, 242, 144, 

240, 230, 198, 166, 198, 888, 2864 
180 DATA41, 127, 157, 119, 2, 169, 20, 141, 119, 2, 230, 198, 

234,104,141,-155,888,1649 
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190 DATA300, 234, 234, 104, 168, 104, 170, 104, 76, 191, 234 

,15,234,234,234,234,888,2870 
200 DATA234, 170, 41, 128, 205, -155, 300, 240, 166, 168, 18 

9,-185,300,201,255,240,888,2497 
210 DATA150, 170, 152, 72, 76, -82, 300, 0,0, 175, 181, 199, 

205,211,89,187,888,2085 — 

220 DATA255, 196, 10, 243, 44, 20, 92, 62, 255, 255, 231, 25, [J 

133,35,238,69,888,2163 
230 DATA255, 255, 255, 28, 228, 6, 42, 102, 255, 111, 121, 23 

4,158,249,151,255,888,2705 
240 DATA75, 255, 224, 3, 65, 51, 143, 107, 83, 217, 0,139, 18 

4,124,56,178,888,1904 
250 DATA79, 255, 193, 202, 208, 214, 145, 255, 39,0,888, 15 

90 
260 DATA 999 
900 READ A: IF AOCK THEN PRINT"*** DATA ENTRY ERRO 

R ON LINE"LN"***" :END 
910 CK=0 iLN=LN+10 :I=I-1 :GOT085 

139-143 $8B-8F RNDX 

BASIC RND work area, last random number, or initiial see^j 

This routine is initialized at power-on/reset, along with the 
CHRGET routine, from a master copy in ROM. The copying of this 
area to zero page is done by the routine INITBA at location 58276 
($E3A4). The initial value of this location is .811635157, or 
$80,4F,C7,52,58 in five-byte floating point format. RND (Random) 
returns a number ranging between and 1. 

The sign of the argument affects the resulting random number 
generated by RND. The number or variable in parentheses after 
RND is called the argument. For example, in: 

RND(9) 

9 is the argument. 

The RND routine creates the random number by exchanging the 
first and fourth byte of the mantissa of the argument. The exponent 
is then overlaid to insure a value ranging between zero and one. - 

A positive argument is ignored by RND and the resulting ran- [_J 

dom number is based on the last seed stored in this location. 
Because of this, using only positive arguments for RND will cause 
the same sequence of numbers to be returned from the original ROM- I [ 

copied seed. That's not to say that running the program twice will 
give the same random numbers. The ROM seed is only copied here 
at power-on/reset. It does mean that the nth RND used since power- r~i 

on/reset will return the same number. In other words, the third ran- LJ 

dom number will always be the same, as long as the computer has 
not been turned off, then back on. This can be helpful when testing 
a program. 
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Location 57482 ($E08A) shows the constants used to derive this 
version of RND. Once the constants have been applied to the pre- 
rn vious seed value, RND treats the resulting value the same as it 

would a negative argument. 

A negative argument will return the same number for a given 

n argument. This happens because a negative argument replaces the 

seed number in this work area. Normally, the result of the previous 
random number replaces the seed, and is used in determining the 
next random number. The negative argument sets the seed at that 
value and so determines the future random numbers from that point 
on. A particular seed value will always cause the next random num- 
ber to be a particular number. 

RND(O) causes the values in the 6522 VIA#1 chip timer 1 at 
37140-37141 ($9114-9115) and in timer 2 at 37144-37145 ($9118- 
9119) to be used to derive the returned random number. The 
RND(O) feature is not the best recommendation for repetitive ran- 
dom numbers since clock cycles may remain constant during pro- 
gram loops. 

R=RND(— TI) is recommended as an initial seed (ignoring the 
returned result in variable R), with the remainder of the program us- 
ing R=RND(1) whenever a random number is needed. The desired ; 
range of integers returned (range = A to Z) may be insured by using 
R=INT((Z-A-I-1)*RND(1)4-A). 

Location Range: 144-255 ($90-$FF) 

Kernal Working Storage 

Page storage for the Kernal 

The INITMEM routine initializes this area to zeros at power-on 
or reset. 

INITSK, a Kernal power-on/reset routine, then initializes any 
locations with needed values. See the comments in each location for 
these initialization values. 

BASIC lets the Kernal manage the second half of page 0, but it 
can and does examine parts of it, as well as alter other parts. You 
can change any location with POKE or with ML instructions. 

144 $90 STATUS 

(handy location) 
ST status of I/O completion. 

Kernal routines that open channels or perform input/output 
P] functions check and set this location. When BASIC examines this 

status or sets the ST variable for the programmer to examine, a jump 
is made to the Kernal vector CRDST. This, in turn, goes to the read- 
status routine at 65111 ($FE57). The BASIC syntax checker does not 
allow ST = expression. 
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Machine language routines need to load and examine this byte, 
rather than using the BASIC variable ST. 

See Appendix D for a device, secondary address, and status 
codes table. 
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145 $91 STKEY 25S ($FF) 

(handy location) [_! 

Keyswitch PIA: bottom keyboard row scaiu / 

Each time the jiffy clock TIME is updated by the Kemal, the 
contents of VIA2PA2 (VIA 2-Port A) are copied to this location. 

Every other key on the bottom row of the keyboard may be 
tested for in this location, without using a GET command in BASIC. 

Here's an explanation of the different values you'll find in this 
location: 

255 ($FF) = no key pressed 

254 ($FE) = STOP key pressed; STOP routine will find and act 
on 

253 ($FD) = left SHIFT key pressed; this may be the most use- 
ful returned value. It allows the program to distinguish between left/ 
right SHIFT by checking location 653, then location 145, bit 1 for 
left/notleft. 

251 ($FB) = X key pressed 

247 ($F7) = V key pressed 

239 ($EF) = N key pressed 

223 ($DF) = comma key pressed 

191 ($BF) = slash key pressed 

127 ($7F) = cursor-down/up key pressed 

You can examine the values in this location when the bottom 
row keys are pressed by entering and running this short program. 

Progiam Ml. Key Values, Bottom Row 

10 REM 145 

20 X=PEEK(145):IFX<>255THENPRINTX; 

30 POKE198,0:GOTO20 

Also see location 197 ($C5), matrix coordinate of key, and loea- 
tion 37153 ($9121), VIA2PA1. 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 

146 $92 SVXT 

(possible user 
storage) 
Tape: 0/1 bit timebase fluctuation during read operations. 

This location stores the difference between the actual time for 
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the dipole just read and the adjustable timebase. This determines 
whether a dipole is considered to be or 1. 

The positive and negative voltages recorded onto a tape result in 
two different poles, just like a magnet with a north and south pole. 
Recording on tape can then be represented as a square wave, as 
shovm in Figure 1-2. A dipole is one square wave cycle. A dipole 
tinfe is the time taken to go through two poles, or one square wave 
cycle, such as the one labeled A and B in Figure 1-2. 



Figure 1-2. Square Wave 



n 
n 

n 

I 

n 



After a bit is read, the value in this location is used to adjust the 
value in location 176 ($B0), which slides the timebase value for the 
boundary between a zero and one bit dipole. By comparing the 
actual time it takes to read a bit to the time the tape routines expect 
it would take, the tape routines are able to make adjustments. They 
adjust the value limitations to define noise, 0, 1, or a word marker 
for the next bit. Through this method, tape units can read tapes 
recorded at slightly different speeds than the speed at which the unit 
itself is reading. This location is reset to after each bit has been 
read. 
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Tape: 0=LOAD, 1=VERIFY 



VERCK 

(possible user 
storage) 
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The Kemal performs LOAD and VERIFY in the same routines, 
with this location used to determine which is being performed. The 
Kemal LOAD routine saves the 1 or value here. 

BASIC, on the other hand, uses location 10 ($A) for its LOAD or 
SAVE determination. 
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148 $94 C3P0 U 

(possible user 
storage) 
Serial: output deferred character flag. 

This location is used by the Kemal serial output routines to 
determine when to send the buffered output serial character stored 
in location 149 ($95). 

149 $95 BS9UR 

(possible user 
storage) 
Serial: output buffered character. 

A value of 255 ($FF) in this location indicates that no character 
is waiting for serial output. 

150 $96 SYND 

(possible user 
storage) 
Tape: block found flag, tape leader length bit count. 

This location's values indicate during tape LOAD that: 

• 0: either no block is recognized yet or a block is recognized 
and data is being read from that block. 

• 16-126: has read at least 16 leader bits during read of the tape 
leader either before the first block or between blocks 1 and 2, and is 
now waiting for the word marker at the end of the leader. Leader 
bits are composed of dipoles containing zeros, differing from data 
dipoles which have reverse dipoles of zero then one, or vice versa. 

isi $97 xsm u 

.X register SAVE area for get and put ASCII characters routines. 

158 ($9E) is also used by output routines. 7 - 

The INITEM routine uses this location to test for the start of - f 

RAM and to insure that locations 0-1024 are accessible. 



LDTND y 

(handy location) 
Mumber of currently open files, not to exceed ten. / 

This is used as an end index for the last-used entry in the file, | ; 
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device number, and secondary address data tables, found at the 
following locations: 

n 601 ($259) LAT File number table 

611 ($263) FAT Device number table 
621 ($26D) SAT Secondary address table 

n Entry n in any table corresponds to entry n in the other two 

tables. 

CLOSE decrements this number and shifts up the table entries 
to close any empty gap. 

OPEN increments this number and adds the appropriate 
information to the bottom of the tables. 

Routine CLALL, close-all-files, sets this number to zero, empty- 
ing the tables. 

You can cause BASIC to forget all open files by POKEing a 
into this location. This does not CLOSE any currently open files. To 
insure that no more than ten files are currently open, you could use 
the foUovdng lines to begin your program: 

Program M2. Number of Open Files 

10 REM 152 

20 REM YOU CAN CAUSE BASIC TO 'FORGET' ALL OPEN FI 

LES BY POKING INTO THIS LOCATION. 
30 REM *NOTE* THAT THIS DOES *NOT* CLOSE ANY CURRE 

NTLY OPEN PILES. 
40 REM THE FOLLOWING CAN BE USED TO INSURE THAT NO 

MORE THAN 10 FILES ARE OPEN: 
50 IF PEEK(152)<10THEN70 
60 PRINT"MAX FILES ALREADY OPEN, SPECIFY FILE NUMB 

ER TO BE CLOSED?": INPUT F% :CLOSE F% 

See locations 183-187 ($B7-BB) for the current file parameters. 

153 $99 DFLTN 

(handy location) 
Device number of the current input device. 

ij Used by the Kernal to determine the routines called for process- 

ing the received data. 
^^ VIC-20 devices are: 

' keyboard 

1 tape 
-^ 2 RS-232/user port 

I 3 screen 

4-5 printer 

8-11 disk 
,\ Device numbers 4-31 could be any serial device. 
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BASIC passes the file number to the Kemal when INPUT* or 
GET* causes an indirect jump via the vector at 798 ($3 IE) to 62151 
($F2C7). This is the open-input-channel routine, CHKIN. The vector 
at 798 ($31E) may be changed to your own front-end routine. 
CHKIN stores the current input device number here. See CHKIN on 
page 186 of the yJC-20 Programmer's Reference Guide. BASIC calls 
CLRCHN after every input to close the channel. See CLRCHN on 
page 191 of the reference guide. BASIC uses location 19 ($13) 
CHANNL to save the active input device number for prompting and 
screen control purposes. 

SETIODEF sets the default to during power-on/reset. 

See Appendix D for a device, secondary address, and status 
codes table. 

Jim Butterfield gave directions for reading the tape as though it 
were the keyboard, in the article "BASIC Program Merges: PET and 
VIC," in the June 1982 issue of COMPUTE!. 

1. LOAD the program or routines that you wish to later merge 
into other routines or programs. 

2. OPEN l,l,l,"fUename": CMD 1: LIST wUl create a tape in 
LIST format, with keywords detokenized and readable line numbers. 
The LIST command could be qualified by giving a line number 
range, if desired. 

3. PRINT*1 : CLOSE 1 will properly finish the tape. The output 
may be directed to disk instead, but the following steps work only 
with tape. 

4. Rewind the tape. LOAD the other program or routine that 
you wish to merge to. 

5. POKE 19,1 : OPEN 1 to set the current input channel number 
and to bypass the tape header. 

6. Clear the screen and press the cursor-down key three times. 
It's very important that this be exactly three cursor-downs, preceded 
by a screen clear. 

7. PRINT "home" : POKE198,l : POKE631,13 : POKE153,l. 
This puts a carriage return in the keyboard buffer, indicates that one 
character is in the buffer, and changes the current input device num- 
ber to the tape. \ "i 

8. Ignore any SYNTAX ERROR or OUT OF DATA messages. ^ 

9. CLOSE 1 to finish. 

10. The program lines on the tape have now been merged. 

Steps 1-3 may be used to obtain a detokenized LIST form of the 
program in machine-readable form on either tape or disk. 

Step 7 doesn't seem to work for disk. You can save the program i"" I 

on tape and use the tape technique.. ' — ' 
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Jim Butterfield also explored the subject of merging programs 
from disk files. His article "Merging BASIC Programs from Com- 
'"] modore Disk " appeared in the October 1983 issue of COMPUTE!. A 

' ' step-by-step explanation of the process is included in this article, 

along with a program which merges programs. The process involves 
f— 1 writing a BASIC program that reads lines from two program files on 

I I disk and writing a third program with the lines from both files in the 

correct order. This is done by comparing the line numbers from each 
program, writing the line with the lowest number, and getting the 
next line from the file. This continues until both program files are 
emptied. A few details are worth mentioning about this procedure. 

• Open the input program files with OPEN x,8,x,"filename,P,R" 

• Open the output file with OPEN y,8,y,"0:filename,P,W" 

• DIM A$(2),B$(2),C$(2),N(2) can be used to contain each line 
number's LSB in A$, its MSB in B$, its text line in C$, and the full 
line number in N. By varying the subscript used to reference the ar- 
rays, you can easily select the line from file one or file two. If 1 and 
2 are used as file numbers in the OPEN statement, GET# can use 
the subscript value of the file number. 

• The first two bytes of the input disk files (the saved-from 
address) can be discarded with GET#x,A$,A$ since the correspond- 
ing output file's address can be set to allow a PET as well as a VIC 
and Commodore 64 to load the program. 

PRINT#y,CHR$(l);CHR$(4) does this. 

• When reading the existing program files, the two-byte link 
filed on the start of every line should be tested for an end-of- 
program condition: 

GET#x,A$,B$:IF A$="" AND B$="" THEN... 

The routine branched to should insure that only the other file is read 
from, unless that file has also ended, meaning the output file can be 
marked with the end-of-program link field (PRINT#y,CHR$(0); 
CHR$(0);) and all files should be closed and the program ended. 

• Since the decision of which line to output, and the file to get 
r~j that line from, is based on the line number, N{x) is obtained by: 

GET#x,A$(x),B$(x) 
IF A$(x) = "" THEN A$(x) = CHR$(0) 
n IF B$(x)="" THEN B$(x)=CHR$(0) 

' N(x)=ASC(A$(x))-l-ASC(B$(x))*256 

• The actual text of the program line can be obtained with: 

500 C$(x)="" 

510 GET#x,A$:IF A$="" THEN 999 

520 C$(x)=C$(x)-l-A$:GOTO 510 
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The routine at 999 is branched to when end-of-program line is 
encountered. 

• To write the output file, use: 

PRINT#y,CHR$(l);CHR$(l);A$(x);B$(x);C$(x);CHR$(0) 

where the leading ones are a dummy link field that is recalculated 
by LOAD, and the ending zero signifies end of line. 

• Be sure to examine the disk return codes when opening the 
input and output files: 

INPUT#15,E,E$,E1,E2 

IF E THEN PRINT E$:CLOSE 15:END 

This assumes you OPENed #15 at the start of your program. 

See location 154 ($9A), output device number, for details of 
input/output diversion to other devices using SYS and locations 
780-783 ($30C-30F). See location 19 ($13) for a description of 
BASIC device diversion. 

See location 186 ($BA) for the current device number. 



$9A DFLTO 

(handy location) 
Device jnunber ol output device. 

BASIC passes the file number to the Kemal when PRINT* or 
CMD causes an indirect jump via the vector at 800 ($320) to 62217 
($F309), open-channel-for-output. The vector at 800 ($320) may be 
changed to your own front-end routine. CHKOUT stores the current 
output device number here. See the reference to CHKOUT on page 
186 of the yJC-20 Programmer's Reference Guide. BASIC calls 
CLRCHN after every output to close the channel. Refer to page 191 
in the reference guide for details of CLRCHN. 

SETIODEF sets default to 3 at power-on/reset. This location is 
also used by Kemal output routines to determine the routines for 
sending the data. 

By using ML or SYS and the SAVE area for registers at location 
780 ($30C), you can divert input/output from/to any file number. 
First OPEN a file to the device. See page 196 of VIC-20 Programmer's 
Reference Guide for details on the OPEN routine. 

To divert input, POKE 781 or LOAD .X wdth the file number 
and SYS or use a JSR to 65478 ($FFC6). Location 65478 ($FFC6) is 
simply a vector which calls the CHKIN routine. A SYS or JSR to 
location 65508 ($FFE4), the vector pointing to the GETIN routine, 
will retrieve a byte from the device and place it into .A. Note that 
the routine CHRIN, location 61966 ($F20E), will do the same for a 
serial device. When finished, you can use another SYS or JSR to 
65484 ($FFCC) to restore the keyboard and screen as the default 
devices. 
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' ' To divert output, POKE 781 or LOAD .X with the file number 

and then SYS or use a JSR to 65481 ($FFC9) (the vector to the 

f-1 CHKOUT routine) to open the output channel. Then SYS or use a 

i I JSR to 65490 ($FFD2) to output a byte that is passed in 780 (.A). 

Again, a SYS or JSR to 65484 ($FFCC) CLRCHN (dose-input-and- 

_, output) is used to restore the default devices. 

n See location 186 ($BA) for the current device number. 

155 $9B PRTY 

(possible user 
storage) 
Tape: character parity. 

This location is used to help detect missing dropped bits in tape 
data. It's also a parity work byte during tape load and save, vnth bit 
used to calculate parity. Odd parity is used when the parity bits' 
total number of I's, for all 8 data bits, is an odd number. 

Parity is simply a way of checking data transmissions, making 
sure that the data is received correctly. 

156 $9G DPSW 

(possible user 
storage) 
Tape: dipole switch/byte-received flag. 

During tape load, the following values in this location mean 
that: 

1: a byte has been completely received. 

0: the computer is waiting for the next byte or is still receiving a 
byte. 



157 $9D 

(handy location) 
Kernal message control flag. 

The following values in this location signify: 
128 ($80) = Kernal control messages wanted 
'^ 64 ($40) = Kernal error messages wanted 

■ ' 192 ($C0) = Kernal control and error messages wanted 

If bit 7 is off, no Kernal control messages, such as SAVING, 
r^ FOUND, PRESS PLAY, and so on, will be shown on the screen. 

f I If bit 6 is off, no Kernal I/O ERROR number messages will be 

displayed. 

BASIC calls SETMSG to set this location to 128 ($80) when it is 
n in the READY mode, and to ($0) for RUN mode. BASIC thus pre- 

empts the Kernal error messages altogether. BASIC has its own error 
messages, and prefers them over the Kernal message of I/O ERROR 
followed by an error number. These error numbers correspond to 
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those returned by an error during a Kemal operation in the .A reg- 
ister. See the list of BASIC messages at location 49566 ($C19E) and 
the list of Kernal messages at location 61812 ($F1 74). 

You can also refer to page 203 of the VIC-20 Programmer's Ref- 
erence Guide, but notice that the significance of bits 6 and 7 is 
reversed, in error. — 

You could set this location yourself with a POKE statement. LJ 

158 $9E PTRI 

(possible user 
storage) 
Tape: error log index/filename index/header LD./out byte. 

This location is used by various tape routines for several 
purposes: 

Tape SAVE. Temporary storage for tape I.D. header. The 
header values are: 

1 = relocatable 

2 = user data record 

3 = nonrelocatable 

4 = user data header 

5 = end of tape 

This I.D. is the first byte of the tape header, except for 2 which is in 
the first byte of every record and accounts for the fact that the 192- 
byte tape buffer at 828 ($33C) can contain only 191 bytes of data. 

Tape LOAD. Pass 1 error index value. If not zero, it equals 
two times the number of errors. It indexes into the stack area where 
error addresses are stored. The maximum value is 61 ($3D), result- 
ing in locations 256-317 ($0100-$013D) possibly used for error 
pointers, with a maximum of 31 possible errors. 

Tape header LOAD. Index into tape buffer during comparison 
of filename from tape header to filename specified in LOAD. Loca- 
tion 187 ($BB) points to the desired filename. 

Tape write from BASIC. Holds character for output during the 
CHROUT ($F27A) routine's processing to tape. 

159 $9F PTR2 "-^ 

(possible user 

storage) [ j 

Tape: pass 2 error pointer /tape buffer filename index. '— ' 

This location is also used for several tape routine operations, 
such as: 

Tape LOAD. Pass 2 error correction index, and indexes 
through stack error location address. This is limited to a value no 
greater than the pass 1 error correction index. See 158 ($9E). 
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Tape header LOAD. Index into filename in the tape buffer 
during comparison of filename from tape header to filename speci- 
fied in LOAD. Location 178 ($B2) points to the tape buffer. 

160-162 $A0-A2 TIME 

(handy location) 
Jiffy clock, realtime clock. 

These locations keep a count of the jiffies, one-sbctieths of a sec- 
ond, since power-on. They're reset to zero after 24 hours. 

Tape I/O interferes with both accurate clocking and testing of 
the STOP key; but serial I/O interference, from the disk drive or a 
printer, for example, is negligible. 

The individual locations in this routine have these functions: 

160 ($A0) is incremented every 18.2044 minutes 

161 ($A1) every 4.26667 seconds 

162 ($A2) every .01667 second (one jiffyl 

TI$ and TI are not actually variables in BASIC, since they're not 
stored in the RAM variable pool. Setting TI$ in BASIC 
(TI$=HOUR$+MIN$+SEC$) calls SETTIM. Assigning TI$ in 
BASIC (XY$=TI$) calls RDTIM. See pages 198 and 204 of the VIC- 
10 Programmer's Reference Guide. 

An ML subroutine of BASIC can examine and change these 
locations. Any changes will be reflected in the BASIC variable ST. 

You can create a digital clock on the screen using this short 
program: 

Progiam 1-13. Digital Clock 

10 REM 160 

20 INPUT "HRS,MIN, SEC ";H$,M$,S$ 

25 T$=RIGHT$("0"+H$,2) 

26 T$=T$+RIGHT$("0"+M$,2) 

27 T$=T$+RIGHT${"0"+S$,2) 

28 TI$=T$:T0=TI 

30 IFTKT0+60THEN30 

35 T0=TI:PRINT"{CLR}{11 DOWN} "SPC( 7) ;MID$ (TI$, 1 , 2 ) 

" : "MID$ ( TI$ , 3 , 2 ) " : "MID$ ( TI$ , 5 , 2 ) 
40 GOTO 30 

The TI numeric variable may not be set, only assigned. A good 
reference for this is "Timekeeping," by Keith Schleiffer. This article 
appeared in the February 1982 issue of COMPUTE'. 
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$A3 PCNTR 

(possible user - ~ 

storage) j [ 

Serial: input bit count/Tape: input/output bit count. 

Serial. If the high order flag bit is on, this indicates that the 
last byte has been sent to the serial device. |_J 

Tape. Count of bits remaining to be written for a byte during 
tape write, or bits remaining to be read for a byte during tape read. 
This location is initialized to 8 before each byte and decremented 
after each bit is written or read. During tape write, it is time to set 
up the parity bit to be written when this location is decremented to 
0. When this location's value reaches — 1, it's time to prepare the 
next byte to be written. That's when this location is reset to 8. Dur- 
ing tape read, when this is decremented to — 1, the parity bit has 
just been read and it's time to check for a parity error. Then it's 
ready to read the next byte, so the location is reset to 8. 

164 $A4 FIRT 

(possible user 
storage) 
Serial: input byte/cycle counter/Tape: dipole number. 

Serial. The input byte read in during a serial LOAD or 
VERIFY. 

Tape read/write. Flag to indicate which dipole has been pro- 
cessed. Set to 1 if you just processed the first half of the dipole or 
to if you just processed the second half. 



165 $A5 

(possible user 
storage) 
Tape: block sync countdown/Serial: countdown. 

Tape. Countdown for block synchronization. During tape SAVE, 
is a counter for block countdown characters written to tape before 

each block's data begins. The location is initialized to 9 for each , , 

block, so each block contains 9 countdown characters. The count- I — ' 
doAvn characters are: 9, 8, 7, 6, 5, 4, 3, 2, and 1. For the first block, 

the countdown characters have their high order bit on. The high - 

order bit is off for the second block. Later, during tape load opera- [_J 
tions, the block countdown characters can be used to determine 

whether block 1 or block 2 is being read. _ 

Serial. Countdown from 8 to of bits left in byte to be sent. i ! 
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166 $A6 BUFPNT 

(handy location) 
'"I Tape: count of characters in the tape buffer. 

This location is used to count bytes when writing the tape 
,_ header, and when accumulating BASIC program output for the tape 

( ( buffer. 

You can POKE 166,191 to force a 192-byte buffer to tape, 
regardless of the actual amount of data in it. Refer to the tape buffer 
at location 828 ($33C) for an explanation of the disparity between 
the 192-byte buffer and the 191 bytes of data it contains. 

You can create a tape of 100 191 -byte blank records, which can 
be updated later, by entering this two-line routine: 

Progfam 1-14. Blank Record FUes 

10 REM 166 

20 REM CREATE A TAPE FILE OF 100 191-BYTE BLANK RE 

CORDS FOR LATER OVERLAYING. 
30 OPEN1,1,1,"100RECS" 
40 FORX=1TO100:POKE166,191:PRINT#1:PRINTX; :NEXT:CL 

OSEltEND 

See 178 ($B2) for the tape buffer pointer and restrictions. 

167 $A7 MBIT 

(possible user 
storage) 

Tape: write leader count/read block reverse counter. 

RS-232: bit is the temporary storage for input bit. 

Tape. Write leader length counter. 

When writing leader dipoles to tape, this location is used as a 
counter for an inner loop that counts down to each time the loop 
is performed before the outer loop decrements its counter. This 
results in a total number of leader dipoles written equal to the value 

,-^ of INBIT multiplied by the value in RIPRTY, plus one. See 171 

) I ($AB) RIPRTY for the second value. 

This byte is set to before writing the leader for the header or a 
program. It's set to 128 ($80) before writing the leader between 

P] blocks. See location 146 ($92) for a short description of a dipole. 

Leader dipoles contain zeros, but data dipoles are reverse dipoles, 
which contain a zero, then one, or vice versa. 

f~| During tape load operations, this location indicates which block 

' is currently being loaded. If its value is 2, then the first block is load- 

ing; if its value is 1, it's loading the second block; and if its value is 
0, all blocks are loaded. 
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$A8 BITGI 

(possible user 
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storage) \ [ 

Tape: error flags, = no errors/long word marker switch. ^ 

RS-232: input byte bit count and output new byte. 

Tape. During SAVE, this is a switch for word marker write. If j | 

the value is 0, it's writing the long time for a word marker dipole. * — 

If 1 is the value, the long time for a word marker dipole has al- 
ready been written. 

During LOAD, if the value is not zero, the byte just read is 
considered in error. An example would be if a parity error has 
occurred. 

RS-232. The input byte bit count is derived from location 664 
($298), BITNUM. 



$A9 RmONE 

(possible user 
storage) 

Tape: dipole balance counter/medium word marker switch. 

RS-232: input flag for checking for a start bit. 

Tape. During SAVE, this byte acts as a switch for word marker 
write. If its value is 0, then write the 1 time, medium time, for a 
word marker dipole. If its value is 1, the 1 time for a word marker 
dipole has already been written. 

During LOAD, a 0/1 means a balanced counter. Each time a 
dipole is read, this value is incremented, and each time a 1 dipole is 
read, this value is decremented. When reading the all-0 leader 
dipoles, location 150 ($96) is set when this value reaches 16. The 
maximum value this location can contain is 126. When actually read- 
ing data bytes, this location is initialized to before each byte. Since 
each data bit contains one dipole that is a and another that is 1, 
this counter should be zero after each bit is read. If not, the byte 
error flag in 182 ($B6) is set. 

See location 146 ($92) for a brief description of a dipole. 

RS-232. A value of 144 ($90) in this byte indicates no start bit | / 

received, while means a start bit was received. ' — ' 

170 SM RIDJVTA , , 

(possible user ^ — I 
storage) 

Tape: input status flags, sync countdown. 

RS-232: byte assembly. ~ l_j 

If the SAVE starting address is greater than the ending address, 
this location is set to 128 ($80), indicating invalid parameters. 
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172-173 



Tape. During tape LOAD, the action taken for the byte just 
read is: 
f~] • If 0, then it's waiting for the first block countdown character 

to arrive. Note: This location is initialized to before reading of the 
first header block and before reading of the first program block. 

• If 1-15, block countdown characters are being read. 

• If 64 ($40), valid block countdown characters have arrived, 
and the byte received is treated as a valid data byte. 

• If 128 ($80), the first block has been loaded and a search is 
proceeding for the second block. 

RS-232. This is used as a byte assembly area to be stored where 
($F7) points, as well as for detecting framing error and BREAK. 

See location 247 ($F7), receive buffer pointer, for additional RS- 
232 related locations. 

171 SAB RIPRTY 

(possible user 
storage) 

Tape: write leader counter /read checksum comparison. 

RS-232: input parity /checksum bit storage. 

Tape. When writing leader dipoles to tape, this is used as a 
counter for an outer loop that must count down to — 1 before the 
routine will stop writing leader dipoles. This results in a total num- 
ber of leader dipoles written equal to the value of INBIT multiplied 
by the value in RIPRTY, plus one. See location 167 ($A7), INBIT 
for its value. 

This location is set to 105 before writing the header leader, to 20 
before writing a leader for the first block, and to for a leader 
between blocks. 

During tape LOAD, once both copies of a program are read and 
the load is considered complete, this byte then computes the parity 
over all bytes loaded. This parity or checksum should be the same as 
that just read as the last byte of the program on tape, which was 
similarly computed over all bytes saved to tape. If it's not the same, 
then it's set to checksum error status. This checksum computation is 
done both for the header and the program. The checksum that was 
recorded during the save at the end of the first copy does not appear 
to be used during the tape load. Only the second copy has a 
checksum comparison performed. 



172-173 SAC-AD SAL 

(possible user 
storage) 
Tape/Serial: start address for LOAD/SAVE/VERIFY. 

Copied here from 193 ($C1), the pointer to start of I/O area, 
this location is then used as a pointer through the data, and 
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174-175 



U 
U 

u 



incremented as the data is sent or loaded. Location 174 ($AE) con- 
tains the end+1 address to be attained in this pointer. These loca- 
tions may be pointed to any area when calling Kernal LOAD and \ j 
SAVE routines. Before each byte is written to tape, right after the ' — ' 
word marker long dipole has been written to tape, a check is made 
to see if 173 ($AD) is above 127 ($7F). There are two ways that loca- 
tion 173 ($AD) can be set above 127 ($7F). Li 

Once the memory area and the checksum have been written for 
a block, BLKEND at location 64518 ($FC06) is executed, which sets 
the high order bit on to write an interblock leader. The second way 
172 can be set above 128 is if you specify to save from an area over 
32767 ($7FFF). When 173 ($AD) is found vwth its high order bit on, 
WRTNl ($FC95) executes to write the interblock leader to tape if the 
first block has just finished, or turns off the tape motor if the second 
copy is complete. Thus, a save from 32768 ($8000) causes, after a 
valid header has been written to tape, interblock leader dipoles to be 
written, and the tape motor to be turned off. Through this dual use 
of 173 ($AD), both as block end indicator and as the high order byte 
of the save area, it's impossible to save areas from 32768 ($8000) on 
up. 

The BASIC tape buffer at 828 ($33C) is used for BASIC LOAD, 
SAVE, and VERIFY tape headers. This location is restored from the 
value saved in location 193 ($C1) at the end of the operation. 

Screen management routines save this pointer, use it as a work 
pointer, and then restore it. 

See Appendix F for a technique that you can use with BASIC to 
save/load whole storage blocks. This technique does not require that 
an ML routine be preloaded. 

A type 3 tape header will always load where the tape's start 
address specifies, no matter what a secondary address indicates. This 
header I.D. is created when the secondary address was 1 or 3 when 
creating the tape. If the secondary address was or 2, an I.D. of 1 is 
used. This is relocatable. See the explanation at locations 829-830 
($33D-33E) for how to read and modify the tape header before it's 
acted upon by the LOAD routine. Also see locations 193 ($C1) and 
195 ($C3). jj 

174-175 SAE-AF EAL 

(possible user \ '] 

storage) 

Tape: ending address for LOAD, SAVE, and VERIFY. 

Serial: loading address for LOAD/VERIFY, end address plus 1 for 

SAVE. 

This location is initially set by the Kernal SAVE routine from 
parameters passed to it. 
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177 



RAM saved to disk has a pointer that indicates where it was 
saved from. This pointer is after the next sector pointer and is writ- 
rn ten to disk from the start-saving pointer located at 172 ($AC). Dur- 

' ' ing a disk LOAD, the pointer at 172 ($AC) is read from the device. If 

the LOAD specifies a secondary address of 1, the pointer at location 
P^ 174 is used as the starting pointer for the loaded data. Otherwise, 

I I the data is loaded wherever the parameters passed to the LOAD rou- 

tine are pointing. If a BASIC program is being loaded, this informa- 
tion is obtained from the contents of location 43-44 ($2B-2C). 

This pointer is incremented as data loads, and at the load's 
completion, it points to the end of the loaded RAM. 

The ending address, plus one, of a tape save is stored at this 
location, after the length of the loaded data is added to the value in 
195 ($C3). Once the tape buffer is full, BASIC PRINT* causes the 
Kemal to set this pointer to the end of the tape buffer 828 ($33C) 
and write the block to tape. 

Screen management routines save this pointer, use it as a work 
pointer, and then restore it. 

176 SBO CMPO 

(possible user 
storage) 
Tape: dipole timing adjustment values. 

Timer 1 of VIA 2 at location 37156 ($9124) is adjusted with this 
value during the reading of tape. 

During tape LOAD, this location is used as a factor in comput- 
ing the values to set the adjustable timebase for the next dipole read. 
See location 146 ($92). If this location's value is greater than 0, that 
amount of time is added to the timebase. If it's less than 0, that 
amount of time is subtracted. 



177 $B1 TEMPI 

(possible user 
storage) 
p. Tape: dipole timing timer 2 difference. 

'■ ' Timer 1 of VIA 2 at location 37156 ($9124) is adjusted with this 

value during the reading of tape. 
^ During tape LOAD this location's value is equivalent to the tape 

' t dipole time minus the time between reading timer 2 and resetting 

timer 2. 

This is also a one-byte field that the two-byte timer 2 has been 
\\ compressed into. Bits 9-2 of the timer 2 value since it was last set 

are stored in bits 7-0 of this location. 
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178-179 $B2-B3 TAPEl 60/3 ($3G/03) ^ 

(handy location) 
Tape: pointer to tape buffer. i ] 

Initialized by power-on/reset, this location normally points to 
828 ($33C). BASIC uses the tape buffer for all program tape data 1/ 
O. LOAD and SAVE only use the tape buffer for tape header \ I 

records. Serial devices use the buffer at 512 ($200), but filename '""' 

information is sent from the location the pointer at 187 ($BB) 
indicates, the length specified in 183 ($B7). RS-232 allocates its 512 
bytes of buffers (256 in, 256 out) from the top of available RAM. 

This pointer must contain an address greater than or equal to 
512 ($200) or an ILLEGAL DEVICE NUMBER error will occur. This 
error is checked in the TPBUFA routine, location 63565 ($F84D). 

The TAPEH routine at 63463 ($F7E7) clears the 192 bytes of the 
buffer to spaces before building the tape header, so a filename 
shorter than 187 bytes is padded with blanks. A filename may con- 
tain an ML program after or instead of the name. See location 187 
($BB). 

The pointer to the tape buffer can be used as the operand of an 
ML indirect JMP off of the zero page location to any ML routine that 
you've stored in the buffer. 

180 $B4 BITTS 

(possible user 
storage) 
Tape: miscellaneous flags/RS-232: various uses. 

Tape. Nonzero means tape routines are ready to receive data 
byte. This is reset to zero between blocks. 

RS-232. Transmit bit count out, timer enable flag, parity, and 
stop bit manipulation. 

Output bit count is derived from location 664 ($298), BITNUM. 
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B5 NXTBIT 

(possible user 

storage) 
Tape: flag for currently reading data or leader. 
RS-232: next bit to be sent or EOT. 

During tape LOAD, this address indicates where the tape LOAD } I 

routine is currently reading data. If its value is not zero, the tape is ' — 
before a block of data, waiting for a word marker at the end of the 

leader bits. If its value is zero, then bytes of data are being read from r , 

the block. This location is set to zero once a word marker has been i — ' 
received after location 150 ($96) has been set. 

This location is also used by RS-232 NMI routines to hold the 

next value for VIA 1 control line options at location 37148 ($91 IC). [J 
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^ 182 $B6 

(possible user 
!~1 location) 

' Tape: accumulator for number of read errors. 

RS-232: byte disassembly area for bxiffer pointed to by 249 ($F9). 

r~] This holds the byte currently being sent from the RS-232 buffer. 

See location 249 ($F9) for additional related locations. 
Tape. During tape LOAD, this flag is set to nonzero if the byte 
just read was considered in error. This error can be a parity error, a 
dipole mismatch, or a verify error. 



183 $B7 

(handy location) 
Nxmiber of characters in filename. 

Only the first 16 characters of a filename will show in a 
FOUND message, so the message is never longer than a 22-column 
line. 

Disk directories allow a 16-or-less character filename. When 
merging disk files, 16 can be too long since the command syntax 
allows only 40 characters. Three names with delimiters must be 
included in these 40 characters. Because of this, it's a good idea to 
use shorter names or rename a file before merging. 

If you have tape files vdth ML programs saved within them, 
there is no corresponding method for saving ML code beyond 16 
bytes in disk program headers. Disk filenames may contain a 
SHIFTed space which ends the name as though a quote were placed 
there. The remainder of the filename is used as comments. For 
example, entering SAVE"PROGRAM.3K",8 (where . is a SHIFTed 
space) causes the filename to appear as "PR0GRAM"3K in the 
directory. You may reference the file as PROGRAM, or as its full 
name by once again including the SHIFTed space in the name. A 
second file named "PR0GRAM"8K+ would not be found unless the 
shifted space and 8K-I- were included in the name. 

If OPEN, LOAD, or VERIFY tape doesn't specify a filename, this 
r~} location will contain a zero after opening, making the filename 

pointer at 187 ($BB) irrelevant. Disk always requires a full or generic 
name, and this location will always be greater than zero. If a com- 
pletely generic name is used for disk, for example lOAD"*",8, the 
length at this location will be 1. The * is only one character. 

When RS-232 is opened, there can be up to four characters in 

the filename which are copied to location 659 ($293) through 662 

ij ($296). These correspond to the control register, command register, 

and nonstandard bit-timing values. 

A value is stored here by SETNAM from .A when called. 
j'^ See related locations 187 ($BB) and 828 ($33C). 
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This location and 187 ($BB) can be used to retrieve the filena^^ 
for use ift a program. See the description of the tedhnique at locatiKi 
187 ($BB). 

(By some clever manipulations, a tape filename may theoreti- 
cally be up to 250 bytes long. I haven't seen this done, but routine 
TAPEH is the place to start investigating if you'd like to pursue the 
idea.) U 
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U 



$B8 LA 

(handy location) 
Current logical file number being used. 

A maximum of ten files can be open at any one time. The file 
number can range between 1 and 255. 

If the file number is greater than 127, a linefeed character is sent 
to the file following any carriage returns. 

BASIC'S OPEN and the OPEN routine at location 62474 
($F40A) use this number to build the file number table at location 
601 ($259). 

SETLFS is used to set this location, as well as locations 185 
($B9), and 186 ($BA) from the contents of .A, .X, and .Y. 

Whenever I/O needs to change the current channel for input or 
output, the file number is passed to CHKIN or CHKOUT, unless the 
device is the keyboard or screen with no other channel currently 
open. This location, 185 ($B9), and 186 ($BA) are then set by pulling 
the corresponding entries from: 

601 ($259) LAT File number table 
611 ($263) FAT Device number table 
621 ($26D) SAT Secondary address table 

This location serves primarily as an index into these tables so 
that the secondary address and device number for a file can be 
remembered by the Kemal. Devices that support multiple open files 
at the same time — for example, a disk — differentiate internally 
between files by the secondary address, not the file number. So, 
OPEN 4,8,15 is perfectly acceptable to communicate with the disk 
DOS. The file number need not be 15, except for convenience sake. \ i 

See locations 152 ($98), 153 ($99), and 187 ($BB). Also see '^ 

Appendix D for a device, secondary address, and status code table. 

u 

IBS $B9 SA 

(handy location) , , 
Current secondary address being used.? ' j 

The valid range of this number is 0-31 for serial devices and 0- 
127 for nonserial devices. 0, 1, and 15-31 have special meanings for i , 

DOS. Use 2-14 for disk data files. U 
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187-188 



The keyboard and screen ignore this secondary address. 

A secondary address for tape signifies read (0) or write (1). EOT 
f~| (2) can be added to either. This number is not the tape header I.D. 

' • that is stored on the tape. See location 828 ($33C) for details of the 

tape header I.D. The VIC-20 Programmer's Reference Guide has an 
l— ^ error regarding tape secondary addresses. An odd secondary address 

I I results in a nonrelocatable program; an even secondary address 

results in a tape I.D. header of 1, indicating a relocatable program. 

By adding two to the secondary address, an end-of-tape (EOT) 
header is written at the end of the file. 

For serial devices, the Kemal ORs the secondary address with 96 
($60), giving a high order nybble of 0110. When listen-with- 
attention is sent to these devices, the secondary address is ORed 
with 32 ($20), resulting in a high order of 0010 in binary. 

The disk tells which files are open by the secondary address, not 
the file number. When loading a program from disk, a secondary 
address of is used by the Kernal, and a 1 when saving. A second- 
ary address of 15 for disk is the DOS communication channel. 

The printer determines the character set to be used by the speci- 
fied secondary addresses. 

See 621 ($26D) SAT secondary address table. 

See 184 ($B8) for list of related fields. 
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ISS SM 

(handy location) 
Current device number being used. 

This location is also called the primary address in some 
documentation. 
VIC-20 devices are: 

keyboard 

1 tape 

2 RS-232/user port 

3 screen 
4-5 printer 

n 8-11 disk 

4-31 could also be any serial device. 

See location 611 ($263) FAT device number table. 
f— 1 See locations 184 ($B8), 185 ($B9), 153 ($99), and 154 ($9A). 

187-188 $BB-BC FNADR 

i— I (handy location) 

■ ' Pointer to the current filename. 

If an OPEN, LOAD, SAVE, or VERIFY for tape doesn't specify a 
filename, then location 183 ($B7), the length of the filename, con- 
tains zero, and this pointer is unpredictable. However, location 833 
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($341), which is part of the tape buffer, contains the filename after 
an OPEN for input of an unspecified tape file, but not after any sub- 
sequent tape I/O. 

Disk always requires a full or generic name, so the filename 
length in location 183 ($B7) will always be greater than zero. 

When RS-232 is opened, there may be up to four characters in 
the filename which are copied to locations 659 ($293) through 662 
($296) and correspond to the control register, command register, and 
nonstandard bit fiming values. 

The TAPEH routine, which builds the tape header, clears the 
192 bytes of the tape buffer to spaces before creating the tape 
header. Any filename shorter than 187 bytes is padded with blanks. 
A filename may contain an ML program after or instead of the 
name. The UNNEW technique mentioned in location 43-44 uses this 
method. Another reference is "Saving Machine Language Programs 
on PET Tape Headers," by Louis Sander, which appeared in the July 
1981 issue of COMPUTE!. There is no corresponding method for sav- 
ing ML code beyond 16 bytes in disk program headers. 

If a tape being read is opened without a filename specified, the 
tape filename will be in the tape header at location 833 ($341) after 
OPEN, but not after any subsequent tape I/O. 

See related locations 183 ($B7), 178 ($B2), and 828 ($33C). 



$BD ROPRTY 

(possible user 
storage) 

RS-232: send parity calculation work byte. 

Tape: byte just read or shifting byte currently being written. 

During SAVE, this byte is saved to tape. After one bit is written 
to tape, the byte is shifted right one bit, and the procedure repeats 
until all eight bits have been written. 

During LOAD, this location holds the byte that has been read 
after being built in 191 ($BF). 



190 $RE 

(possible user \ | 

storage) 
Tape: which copy of block remaining to read/write. 

• A 2 in this location means both copies of block remain to | | 

save/load. 

• 1 in this location means that the last copy of block remains to 
save/load. ^ j 

• A means that both copies of block are done. 
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''in SBP MYGH 

(possible user 
j^ storage) 

' ' Tape: input byte currently being constructed. 

During tape read, the bits read from tape are rotated into the 
fl high order to low order bits to build a byte. Once eight bits have 

been received, the byte is considered complete. 



SCO CASl 

(handy location) 
Tape: motor interlock switch. 

A nonzero value here, which is possible only if some tape but- 
tons are pressed down, prevents any change of tape motor svntch. 
The IRQ interrupt handler at location 60095 ($EABF) normally sets 
this location to if no tape buttons are pressed down. 

During tape read or write, this is set to nonzero once a tape but- 
ton has been pressed and will be reset to zero once the tape action is 
completed. A zero at this location, which is possible with either 
some or no buttons down, allows the tape motor to be turned on. 
This is done within the normal IRQ interrupt routine if location 
37148 ($911C) has bits 2 and 3 on. 

The effect of placing values in location 37148 ($911C) using 
POKE 37148,(PEEK(37148) AND 241) OR n, where n is: 

• 0,2,4,6 Stops the motor 

• 8 No change 

• 10 Stops the motor 

• 12,14 Starts the motor 
This location has no control over tape motor settings outside of 

the default IRQ interrupt handler. 

193-194 $GI-G2 STAL 

(handy location) 
Tape/Serial: pointer to the start of the I/O area. 

These locations are initially set in SAVE/LOAD from param- 
eters passed to them. 

This points to the area being loaded or saved, such as the tape 
buffer or RAM address. 

See location 174 ($AE) for disk LOAD. A SAVE to disk writes 
this initial value as the address the RAM was saved from. No ending 
address is sent. 
r~{ Locations 195-196 ($C3-C4) are copied to this location after the 

LOAD is completed, or before the LOAD is actually begun if a 
norurelocatable, I.D. tj^e 3, tape header is found. Finally, this loca- 
tion is copied to 172-173 ($ AC-AD). 
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This pointer is used by INITMEM to find the lowest RAM. The 
screen memory location is determined and set up from this test. 

It's also used by TESTMEM as a pointer while performing a 
nondestructive test of every RAM bit's quality. 

I9S-I96 $G3-G4 MEMUSS 

(handy location) 
Pointer to the RAM area being LOADed. / 

The start-of-LOAD address is saved at these locations by the 
LOAD routine from parameters passed to it. 

This is overwritten with the starting address of the saved data 
from the tape header if a tape header I.D. 3 is found. It is also 
overwritten if the secondary address specified for LOAD was not 
zero. See location 829-830 ($33D-33E) iox a method of circumvent- 
ing the t3^e 3 header I.D. 

Power-on/reset or the RUN/STOP-RESTORE key causes the 16 
defauh vectors in ROM at 64877 ($FD6D) to be copied into locations 
from 788 ($314) to 818 ($332). This pointer location is also used as a 
base address during this process. 

The VECTOR routine at 64855 ($FD57) can be used to read or 
change these default vectors. 



$CS LSTX 

(handy location) 
Matrix coordinate of last key pressed. 64 if none j>ressedj., 

Used for stabilizing the current key in location 203 ($CB). 

This value is set with every IRQ interrupt. The advantage of 
using this location, or 203 ($CB), is that near-instantaneous recog- 
nition of the key and that near-simultaneous pressing of keys can be 
prioritized. In an IRQ wedge preamble, this value will need to be 
used since ASCII conversion of the key is done later in IRQ code. 

The SCNKEY routine translates this key value into ASCII by 
picking up the nth value in the table, where n is the contents of this 
location with SHIFT, Commodore, and CTRL keys determining the 
table used. 

The following statement will allow an in-program pause wheri 
displaying more than a screenful of information to the screen. 

WAIT 197,64 

Pressing any key other than SHIFT, RESTORE, CTRL, or the 
Commodore key will halt the program until the key is released. 

See also 653 ($28D) for SHIFT/CTRL/Commodore key flags, (- j 

and a routine for a locking pause key. Refer to location 37153 * — 

($9121) for data register contents. 

The values returned for each key pressed are below: | J 



U 
U 
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Table M. Keycode Values 



Key 


Code 


Key 


Code 


Key 


Code 


Key < 


Cod( 


pressed 




pressed 




pressed 




pressed 




<- 


8 


A 


17 


Q 


48 


Z 


33 


1 





S 


41 


W 


9 


X 


26 


2 


56 


D 


18 


E 


49 


C 


34 


3 


1 


F 


42 


R 


10 


V 


27 


4 


57 


G 


19 


T 


50 


B 


35 


5 


2 


H 


43 


Y 


11 


N 


28 


6 


58 


J 


20 


U 


51 


M 


36 


7 


3 


K 


44 


I 


12 


/ 


29 


8 


59 


L 


21 


O 


52 


, 


37 


9 


4 


: 


45 


P 


13 


/ 


30 





60 


/ 


22 


@ 


53 


CRSRDN 


31 


fl 


39 


+ 


5 


* 


14 


CRSRRT 


23 


f3 


47 


- 


61 


f 


54 


DEL 


7 


f5 


55 


£ 


6 


= 


46 


HOME 


62 


f7 


63 


None 


64 


RETURN 


15 


Space 


32 



Values not placed in location 197 ($C5), but reserved: 
Commodore 40 CTRL 16 rtSHIFT 38 ItSHIFT 25 



The STOP key is represented by a code of 24 m this location. 
You would not be able to detect this in a program without disabling 
the STOP key first. See the vector description at 808 ($328) for a 
description on how to disable the STOP key. 

The following program can be used to examine the various 
representations of a character entered on the keyboard: 

Program MS. Keyboard Character Values 

10 PRINT" {CLR}{RVS} PRESS ANY KEY" 
20 GETK$:IFK$=""THEN20 

30 PRINT "KEY="K$" MATRIX="PEEK(197 ) "ASC="ASC(K$ ) "S 
HIFT="PEEK(653) :GOTO20 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 



P*| (handy location) 

Number of characters (0-10) in ihe keyboard buffer at 631 ($277). 

The INPUT and GET statements pull characters that haven't yet 
been used from the keyboard buffer. By putting a zero in this 
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location, you can cause any current contents of the keyboard buffer ^ — ' 
to be ignored. 

To wait for the user to press a key to signal that the program ^ , 

can continue, you could enter: ''\ ) 

POKE 198,0:WAIT 198,l:POKE 198,0. 

The zero POKEs insure that previous keystrokes are not cur- ) I 

rently in the buffer, and clear out the key that was pressed to con- ^ — 

tinue the program. 

By storing a number in this location and putting the desired 
characters in the keyboard buffer, you can simulate keyboard entry. 
Be sure to include the ending carriage return in this count and the 
buffer. 

By putting multiple carriage returns in the keyboard buffer, 
clearing the screen, carefully placing messages on the screen, homing 
the cursor, setting this location to the number of carriage returns, 
and ending the program, the lines on the screen will be read just as 
though they were entered at the keyboard. Careful placement of the 
lines on the screen is crucial in using this feature. You must avoid 
BASIC messages. See the sample dynamic keyboard routine at loca- 
tion 277 ($115) 

You can increase this niMnber to as high as 15 since locations-- 
641-645 ($281-285), the end-of-RAM-pointer, start-of-RAM-pointer, 
and serial timeout flag, are not normally used after BASIC is cold 
started. The maximum length of the keyboard buffer specified in 649^ 
($289) would then be set to a value of 15. ..i 

The RUN/STOP key zeros this number, clearing the keyboard 
buffer. RUN/STOP-RESTORE resets 649 ($289) back to ten. 

GET reads from the keyboard buffer using the GETIN routine. 
OPEN 3,3:INPUT#3 will read from the current screen line up to the 
end of the line or to a carriage return. 

The Kemal routine LP2 at location 58831 ($E5CF) is used to get 
characters from the keyboard buffer and maintain the count of 
characters in the buffer. 

199 $C7 IIV9 

(handy location) l | 

Flag for reversed screen characters. 

If this location is set to 18 ($12), characters will appear reversed^' . . 

on the screen. This is done by ORuig the character wife 128 ($80), I I 

which causes the reverse character set to be used. See location 3276.8 



This flag is set on entry of a RVSON (reverse on) key, and 1 ) 

cleared when a carriage return or RVSOFF (reverse off) is entered. 

This location may be POKEd directly, but it may need to be 

POKEd again to compensate for the factors that return it to zero. j I 
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iM SC8 mux 

(handy location) 
rn Pointer to the end of line for input. 

This location indicates how many columns in a logical line are 
nonSblank. 
pn Its value originates from the current screen line logical length in 

location 213 ($D5) and is decremented to the last nonblank position 
on the screen line. 

See location 201 ($C9) for line/column/cursor pointer 
summation. 



$C9-CA LXSP 

(handy location) 
Current cursor INPUT logical X-Y position (line, column). 

This location is used by GET and INPUT, the GETIN and 
CHRIN routines, when reading the screen. 

The logical line number range is from to 22, while the column 
number can be from to 87. The logical line could contain up to 
four physical lines. 

The screen line link table at 217 ($D9) flags physical lines not 
continued. 

Here's a summation of the page 0/1 locations used by the Kemal 
screen editor and other routines: 

200 ($C8) End of tiie text on current line 

201 ($C9) Logical line number 

202 ($CA) Column of cursor 
204 ($CC) Cursor blink switch 

206 ($CE) Character under cursor 

207 ($CF) Character blink stahis 

208 ($D0) Screen length or keyboard input 

209 ($D1) Pointer to start of line in screen RAM 
211 ($D3) Cursor displacement with screen RAM line 

213 ($D5) Logical line length 

214 ($D6) Physical line number 
243 ($F3) Pointer to start of line in color RAM 
647 ($287) Original color under cursor 

658 ($292) Screen scroll enable flag 
|~] The screen line link table at locations 217-241 ($D9-F1) 

includes examples of using some of these locations. 



$CB SFDX 

(handy location) 
Matrix coordinate of current key pressed. 64 if none. 

PI See Table 1-1 at location 197 ($C5). 
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See also 653 ($28D) for SHIFI/CTBL/Commodore key flag^. 
See also 37153 ($9121) for the actual data register contents; / 



207 $CF 

Cursor blink status. 1= reversed character, O=noiireversed. 

62 



U 
U 



u 
,_ u 

Cursor blink switch. 0= flash, nonzero = quiet. 

This location insures that the cureor won't flash when characters I | 

are in the keyboard buffer. 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 

205 SCO BLNGT 

Cursor countdown before blink. 

Normally set for 20 jiffies between blinks of the cursor, as 
counted by the interrupt routine IRQ, this location makes the cursor 
blink three times per second. Every time the cursor blinks, locations 
206 ($CE) and 647 ($287) are updated. Turning the reverse on and 
off for the character under the cursor causes the blinking image. 



(handy location) 
Character under cursor in screen POKE code. 

Screen POKE codes (P) can be converted to ASCII (A) by the 
following routine, with R being set to 1 if the screen POKE code was 
for a reverse character. To add this routine to a program of your 
own, use a GOSUB command to line 50. 

Progiam 1-16. ConveiUng POHE Codes to ASCD Code 
Walues 

50 P = PEEK(206) I R= 

60 IF P > 127 THEN R = .1 : P = P AND 127 

70 IF P < 32 OR P > 95 THEN A = P + 64 : GOTO 100 

80 IF P > 31 AND P < 64 THEN A = P : GOTO 100 

90 A = P + 32 

100 RETURN 

u 

Remember that the values returned will be for the character 
beneath the cursor. Many times this character will be the space 
(ASCII value of 32), so to receive a different value the cursor will (_J 

have to be placed atop another character. 

See Appendix C for a character code chart. Every time the 
cursor is blinked, determined with location 205 ($CD), the cursor I I 

countdown, this location and 647 ($287) are updated. '— ' 
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This location indicates whether the current cursor blink has 
reversed or unreversed the character under the cursor. 
rn The use of some of the cursor control fields is shown in the 

following routine. The cursor is turned on during a GET operation, 
with a different blink rate than normal; a default multicharacter 

n entry is placed under the cursor; and your entry is collected until a 

RETURN is pressed. The POKEs that cause the cursor to blink must 
be left on the same program line as the GET statement. The value of 
BS (blink speed) can be changed to obtain the correct value for your 
own program. 

Program 1-17. Cursor Control Relds 

10 REM LOG 207 (FOR 205,204,207,211) 

20 REM INPUT-LIKE GET, (EXCEPT DEL & INST) UP TO 2 

55 CHARS, COMMAS OR COLONS OK 
30 BS=3 :REM BLINK SPEED, ADJUST TO YOUR PROGRAM N 

EEDS 
40 D$="DFLT":PRINTD$; :POKE211,0: REM DEFAULT 
50 POKE207,0:POKE204,0:POKE205,BS:GETK$:REM BLINK 

{SPACE} FAST CURSOR 
60 IFK$=CHR$(13)THEN140: REM ALL DONE WITH ENTRY 
70 IFK$<>CHR$(133)THEN110:REM INPUT ESCAPE IS Fl K 

EY 
80 POKE204,0:POKE207,0 
90 X=PEEK(209)+PEEK(210)*256+PEEK(211): POKEX,PEEK 

(X)AND127: REM TURN OFF ANY REVERSE 
100 END 

110 PR1NTK$;:REM SHOW KEY 

120 S$=S$+K$: REM BUILD THE ENTRY STRING 
130 GOTO50: REM GET THE NEXT KEY 
140 IPLEN(S$)=0THENS$=D$:GOTO160: REM USE DEFAULT 

{SPACE} IF NO ENTRY 
150 X=PEEK(209)+PEEK(210)*256+PEEK(211): POKEX,PEE 

K(X)AND127:PRINT:REM OFF ANY REVERSE 
160 PRINT "{ RVS }" S$ ; LEN ( S$ ) :S$="":GOTO40: REM SHOW 
{ SPACE }THE STRING AND GET NEXT 

n 

208 $D0 CRSW 

p_ Flag indicating if input from screen or keyboard. 

I I Zero in this location indicates input from the keyboard. Other 

values indicate input from the screen. Possible values are 0, 21, 43, 
p. 65, or 87. 

I I This address is also used to save the current line length from 

location 213 ($D5) after a carriage return while getting it from the 

keyboard buffer. 
|~] See location 631 ($277) for a summation of keyboard-related 

RAM locations. 
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209^^0 $DI-D2 PNT 

Qimiy location) 

Pointer do Uie start of the lo^cal line that the cursor is on. / 

This pointer indicates the line in screen map RAM. When the 

line is a continuation of a previous line, this pointer contains the 

location of the start of the continued line. The MSB of this pointer is i I 

also the screen page that the logical line is in. * — ' 

The line pointed to and the values in this location are: 

Logical Pointer 209 ($D1) LSB value 



line 


DEC 


HEX 


01 


00 


$00 


02 


22 


$16 


03 


44 


$2C 


04 


66 


$42 


05 


88 


$58 


06 


110 


$6E 


07 


132 


$84 


08 


154 


$9A 


09 


176 


$B0 


10 


198 


$C6 


11 


220 


$DC 


12 


242 


$F2 


(Screen line 12 


crosses a page b 


oundarj 


in location 210, 


$D2.) 




13 


08 


$08 


14 


30 


$1E 


15 


52 


$34 


16 


74 


$4A 


17 


96 


$60 


18 


118 


$76 


19 


140 


$8C 


20 


162 


$A2 


21 


184 


$B8 


22 


206 


$CE 


23 


228 


$E4 



u 

See Appendix E for details of the relocatable scieen niap. ) 

Location 243-244 ($F3-F4) is set to the address of th^ - 

corresponding line in the color map. M 

Location 211 ($D3) contains the number of the column that thi^ 

cursor is on at the time. ' _ 

See location 201 ($C9) for a line/column/cursor pointed M 

sumffiaflon;? "— ' 
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211 $D3 PNTR 

(handy location) 
r*] Cursor position within the logical screen line. 

The range of this location's value is 0-87 ($0-57). 

This is typically used as an index added to location 209-210 
|~| ($D1-D2), pointer to the start of the logical line that cursor is on. It's 

also used for screen editing, input, and output routines. You can use 
this location to position the cursor wherever you wish. For example: 

POKE 211,18 

will position the cursor on column 19. Refer to location 207 ($BF) for 
a method of turning on the cursor during a GET statement. 

The PLOT routine at 58634 ($E50A) will set or read this value 
from/to .Y and set or read the physical line number in location 214 
($06) from/to .X. Refer to location 201 ($C9) for a line/column/ 
cursor pointer summation. 

212 $D4 QTSW 

(handy location) 
Flag to indicate if within quote marks. 

A value in this location indicates not within quotes, a 1 
indicates within quotes. 

The QUOTECK* routine sets/unsets this flag. 

A carriage return turns off the quote mode flag. 

When printing to the screen, if a control character such as a 
cursor down, color command, or a dear command is within quotes, 
the control character is printed and not acted upon. When the string 
is sent to the screen but not enclosed in quotes, the control codes are 
acted upon. 

A special case is the INST/DEL key: An insert stores the INST . 
control in the string, but hitting the RETURN key or SHIFT and then 
RETURN, followed by positioning the cursor over the original string 
and using an insert, allows insertion within the string. Pressing the 
RETURN or SHIFT and RETURN keys, followed by positioning the 
cursor over the original string and using an insert, then a delete, 
causes the DEL control to be stored in the string. Normally, DEL 
deletes a character in the string and doesn't store a control for itself. 

You can also insert control codes by entering a blank for them 
in the string, pressing RETURN or SHIFT and RETURN, pressing 
CTRL and RVSON together, then going back to the string and typ- 
ing the letter or SHIFTed letter. 

This flag is maintained by the routine at 59064 ($E6B8) when 
reading the keyboard buffer or writing to the screen. 

See location 788 ($314) for an example of modifying this loca- 
tion to escape from the quote mode. 



n 
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A related location is 216 ($D8). 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 
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213 $DS LNMX 

(handy location) . — . 

Current screen line logical length. LJ 

This location determines when to start a new screen line or 
expand the current logical line with another physical line. Possible 
lengths are 21, 43, 65, or 87. 

Screen scrolling uses this location to scroll the entire logical line. 

Some routines use this to determine the end-of-line position for 
backward scanning of the line. 

Location 200 ($C8) is derived from this location's value. 

See location 201 ($C9) for a line/column/cursor pointer 
summation. 

214 $D6 TBLX 

(handy location) 
Cursor: current physical screen line cursor is on. 

The possible positions for the cursor range from line to line 
22. You can place the cursor on any line, simply by entering a POKE 
statement. For example: 

POKE 214,7 

places the cursor on line 8. See location 207 ($BF) for a way to turn 
on the cursor during a GET statement. 

The PLOT routine at location 65520 ($FFFO) may be used to 
set/read this and location 211 ($D3). 

See location 201 ($C9) for a line/column/cursor pointer 
summation. 

215 $D7 ASClf 

(handy location) 
ASCn value of last key pressed. 

Temporarily used by SCRNOUT* to hold the character going to < — ' 
the screen. 

Tape. Checksum of bytes in the current block being written : , 

and the value of the first dipole being read. The value can be either ! I 

Oor 1. 

216 $D8 INSRT 

(handy location) 
Number of outstanding inserts remaining. > 

As the INST/DEL key is pressed to indicate an insert, thej 1) 
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Kemal screen editor shifts the line to the right, allocates an addi- 
tional line if necessary and possible, updates the screen line length 
f~| in location 213 ($D5), and adjusts the screen line link table in 217, 

($D9). 

You can POKE 216,0 within a program to turn off the insert 
mode. Disabling the quote mode like this can also be done by enter- 
ing a carriage return or SHIFT and RETURN. 

Characters that fill an inserted space are treated as though they 
were enclosed in quotes. 

Refer to location 788 ($314) for an example of how to modify 
this location to escape from the insert mode. 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 



217-241 $D9-F1 LDTBl 

Screen line link table. 

This table contains one byte per screen line used to indicate the 
page of memory in RAM that any particular screen line is in. It also 
contains a flag bit that is set on when the physical line is the first or 
only physical line in an up-to-four-line logical line. The byte for the 
first physical line of a four-physical-line logical line would have the 
high-order bit set, and the three following bytes would not be set, to 
indicate continued lines. 

The page number of the screen line is used in conjunction with 
the displacement table of screen lines (LDTB2) to obtain the location 
of any byte within the screen map in RAM. Be sure to mask out the 
high order bit with PN=PEEK(X)AND127. LDTB2 is at 60925 
($EDFD) and contains a byte for each screen line that is the offset 
within the screen page the line starts on. Using this displacement, 
the screen page, and locations 214 ($D6) and 211 ($D3), any specific 
byte in the screen map RAM can be addressed. 

Location 209-210 ($D1-D2), the pointer to the start of the phys- 
ical line that the cursor is on, is kept current using these tables. 

You can use these tables to quickly determine the correct 
^ address of a new line, last character on a line, or any particular 

' I screen position. Besides using these tables and pointers directly, a 

general-purpose routine can be used. For example, if you wanted to 
place a character on the seventh physical line, in the fourth column 
fj you could enter: 

POKE 214,7-1 : REM physical line number relative to zero 
POKE 211,4-1 : REM physical column number relative to zero 
n SYS 58759 : REM call for set of screen line pointers 

The Kemal determines that line 7 is the second line of a 
continued line, sets location 211 ($D3) to 25 to indicate the position 
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within the logical line that starts in line 6 (21+4), and sets 209-210 
($D1-D2) to point to the start of the logical line. Adding the con- 
tents of 211 ($D3) to 209-210 ($D1-D2) gets you to the byte you 
wanted. Then the Kemal stores a value of 65 in location 213 ($D5) 
so that you know the logical line is 66 bytes long and includes three 
lines, 7 through 9. This is the BASIC equivalent of using the PLOT — 

routine, without having to load any registers for PLOT. To explore I I 

how to load registers before SYS and examine them afterward, see 
location 780 ($30C), the SYS register SAVE area. 

SYS 60045 will clear 22 bytes of the screen to white spaces from 
the location where 209-210 ($D1-D2) point. 

The corresponding color map location for the byte in screen 
RAM that you've located is available by SYSing 60082. This updates 
the pointer at 243-244 ($F3-F4). Add the contents of it and 211 
($D3) and insert the desired color code. 

SYSing 58719 clears the screen, homes the cursor, and resets all 
the links in this table to indicate noncontinued lines. This is the 
equivalent of the CLR key. 

The twenty-fourth byte of this table is used in the scrolling of 
the screen, while the twenty-fifth byte marks the end of the table. 

If the screen is at location 7680, the first 11 link bytes are set to 
158 ($9E) and the remainder set to 159 ($9F). Continuations have 
the high order bit turned off. 

With the screen at location 4096, you would find the first 11 
link bytes set to 144 ($90) and the rest set to 145 ($91). Continu- 
ations would have the high order bit off, their bytes set to 16 ($10) 
or 17 ($11). 

If you don't know where the screen is, using this program line 
will tell you: 

SP = PEEK(217) AND 127 : SCRN = SP * 256 

The first 11 links will be the SP value, with 128 added if they are 
not continuations of the previous lines; the remaining 12 links will 
be SP plus 1. Let's approach it from the other end: If your screen is 
at SCRN, then SP = INT( SCRN / 256). 

One way to find the color map is: i j 

CM = 37888 : X = SCRN / 1024 : IF INT(X) <> X THEN CM = ^ 

CM+512 

This works because the color map is located at 37888 ($9400), unless jj 
the screen is on a half 1024-byte boundary, rather than on a IK 

boundary such as 1024, 2048, 3072, 4096, and so on. If it is not on a 

IK boundary, the color map moves to location 38400 ($9600). j i 

See locations 648 ($288) and 201 ($C9). Also see Appendk E for l— ' 
details on screen relocation. 
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242 $F2 

SAVE byte for screen line link table byte. 

This byte is used by screen management routines to save a link 
byte while a related routine updates the screen line link bytes. 
See location 217 ($D9). 

843-244 $F3-F4 USER 

(handy location) 
Pointer to the current physical screen lines color map area. 

This location is synchronized with location 209-210 ($D1-D2) 
by the COLORSYN* routine and serves as a base pointer to the 
appropriate color nybble for routines that store characters on the I 
screen. These routines use location 209-210 ($D1-D2) as a screen 
map pointer. 

You can use location 244 ($F4) as the beginning address of thq 
color map by turning off the low-order bit of the page number: 

CM = (PEEK(244) AND 254) * 256 

See locations 209-210 ($D1-D2), 217 ($D9), and 201 ($C9) for a 
line/column/cursor pointer summation. Also see Appendix E for an 
explanation of screen relocation. 

245-246 $F5-F6 KEYTAB 

Pointer to keyboard table being used. 

The keyboard tables are used to point to the proper character in 
ROM or RAM that a key corresponds to. Location 203 ($CB) is used 
as the input key number, and location 653 ($28D) is used for SHIFT 
patterns. The resulting ASCII character is placed in the keyboard 
buffer at 631 ($277) by the SCNKEY routine. 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. Refer to location 653 ($28D) for a table detailing the 
values of that address. 

_ 247-248 $F7-F8 RIBUF 

Pi (possible user 

storage) 
RS-232: pointer to start of receiving buffer. 

ij The 256-byte buffer this location points to is created when 

device 2 is OPENed, starting at the address in 643 ($283), minus 
256. 643 ($283) is reset to that address, minus one, to protect the 

r~\ buffer. The address of the receiving buffer is also stored here. 

CLOSEing device 2 frees this buffer and resets 643 ($283) to 
reflect the free memory. 

r~j A BASIC program should always open device 2 before assigning 
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any variables, because of the CLR that BASIC issues after device 2 is 
opened. 

ML programs can allocate as many buffers as needed by adjust- i j 

ing this location, locations 643 ($283), 667 ($29B), and 668 ($29C) ^ 

properly. If the MSB byte of this pointer and/or the pointer at loca- 
tion 249-250 ($F9-FA) is not zero, the OPEN routine assumes that .--, 

the corresponding buffer(s) has (have) been already allocated. A zero I I 

in the MSB at the time CLOSE is issued causes the routine to skip 
the deallocation of the buffer(s). 

Also see locations 249 ($F9) and 668 ($29C) and page 259 of 
the V7C-20 Programmer's Reference Guide. 

249-250 $F9-FA ROBUF 

(possible user 
storage) 
RS-232: pointer to the start of the transmitting buffer. 

This address points to an additional 256-byte buffer for RS-232 
data. 

See the description of location 247 ($F7) and related locations 
182 ($36), 669 ($29D), and 670 ($29E). 



2S1-254 SFB-FE 

(user storage) 
Four bytes of unused page space. 

2SS $FF BASZPT 

BASIC temporary area for floating point to ASCII conversion. 

See location 256 ($100). 
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Memory Page 1 



The 6502 processor chip in the VIC-20, as ir\ other persor\al 
computers, reserves 256 bytes begirming at location 256 ($100) for 
use as a stack and provides instructions for saving and retrieving 
data from this area. " 

Location Range: 2S6-SII ($100-$1FF) 

Stack Area 

256-511 $100-IFF STACK 

BASIC, the Kernal, and the 6502 processor itself use this Last In 
First Out (LIFO) stack for storing and retrieving temporary informa- 
tion. Although this is only temporary information, important data is 
kept here. 

The stack is frequently compared to a stack of plates. The num- 
ber (or plate) placed on the stack goes to the bottom, and each 
succeeding number is put on top of it. Pulling a number off the stack 
gives you the last one placed on. This is called Last In First Out 
(LIFO). This analogy is accurate to a point, but the stack is actually 
upside dov^n, built from 511 ($1FF) downward. The first item placed 
on the stack is put at location 511, and subsequent entries stored at 
consecutively lower addresses. A register in the 6502 called the stack 
pointer keeps track of the next available location in the stack and, by 
implication, the item next pulled from the stack. 

At power-on/reset, the stack pointer is set to 255 ($FF), which is 
effectively 511 ($1FF) because the 6502 chip adds 256 ($100). How- 
ever, NEW and CLR set the pointer to 250 ($1FA) because the JSR 
return address is still on the stack. This is also done after an error 
message is displayed by BASIC. 

BASIC uses the stack for several purposes. It uses it to save reg- 
ister information temporarily while it calls another routine that uses 
the register and for GOSUB return point information. The BASIC 
GOSUB command uses five bytes of the stack at a time. The FOR 
command uses 18 bytes of the stack for every FOR outstanding, and 
complex expressions cause intermediate results to be saved on the 
stack by the formula evaluation routine at location 52638 ($CD9E). 

Whenever a JSR (jump to subroutine, the ML equivalent of a 
BASIC GOSUB) is issued, the address of the instruction to return to, 
minus one, is pushed onto the stack. Since an address takes two 
bytes, this limits the nesting of JSRs to 127 levels if no other data 
was in the stack. However, there will be other data placed here by 
IRQ routines. 
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The area that BASIC doesn't use for stacking, the last 64 bytes 
at locations 256 ($100) to 319 ($13F), is used for conversion of float- 
ing point values to ASCII for printing, and by tape error recovery < j 
routines. — ' 

Here are the subareas used by BASIC as temporary work areas 

in the VIC-20. f ~, 

256-266 $100-I6A """ 

Temporary floating point to ASCII work a?ea for printing 
numbers. 

This area is used by the routine at location 56797 ($DDDD), 
which converts the floating point accumulator to TI$ or an ASCII 
string. 

It is also used for string-scanning purposes. 

256-318 $I00-I3E BAD 

62 bytes of tape error log, indexes of bad data. 

These indexes of erroneous data are examined during the LOAD 
of the second copy of the data from tape, and the data is corrected if 
possible. 

326-511 SMD-IFF BASTACK"^ 

stack area used by BASIC; OUT OF MEMORY message if 
exceeded. 

Some BASIC commands, such as FOR-NEXT loops and GOSUB, 
require many stack entries at a time. Thus, BASIC checks the stack 
size, before pushing more than a few bytes onto it, and returns the 
OUT OF MEMORY error message if there are less than 62 bytes left 
available on the stack. 

Each GOSUB command causes five bytes to be pushed onto the 
stack, in the following order: 

• Value of 141 ($8D); one byte 

• Two-byte return line number 

• Two-byte pointer to the return address for a total of five bytes 

Each FOR statement causes 18 bytes to be pushed onto the stack: 1_J 

• Value of 129 ($81); one byte 

• Pointer to the variable; two bytes 

• Five-byte STEP value j j 

• Sign; one byte 

• Five-byte TO value 

• Two-byte return line number 

• Pointer to the loop return point; two bytes for a total of 18 
bytes 

See the article "FOR/NEXT/GOSUB/RETURN and the Stack," 
by Jim Butterfield, in the November 1981 issue of COMPUTE!. 
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Chapter 3 



Memory 
Pages 2 and 3 



Memory Pages 2 
and 3 

The second and third pages of VIC-20 memory are the home of 
information shared between the Kemal and BASIC. The two major 
buffers used by BASIC are in this area, as well as the vector table 
that can be changed to point to the user's routines rather than 
default BASIC/Kemal routines. The user routine can front-end these 
routines to perform any extra or alternative functions. The INITMEM 
routine initializes this area to zeros during a power-on/reset. The 
routines of INITVCTRS and VECTOR then initialize the vectors 
stored in this page. 

Location Range: 512-767 ($200-$2FF) 

BASIC/Kernal Working Storage 

S12-600 $200-258 EOF 

89-byte BASIC input buffer. 

The screen editor allows a maximum of 88 characters in the 
input line, with the eighty-ninth byte of this buffer used to contain a 
as an end-of-line indicator. To make your programs compatible 
with the Commodore 64, keep the program lines under 80 
characters. 

The routine FIND2 scans this buffer to find quotes, colons, and 
end-of-line delimiters in BASIC statements. The CRNCH routine 
tokenizes the BASIC statement from left to right, packing it in after 
the two-byte integer line number and link address. The end-of-line 
zero is placed after the last character of the tokenized line and the 
STORLN* routine stores the new line in the BASIC program area. If 
this line were entered in direct mode, then the MAIN routine would 
immediately execute the statement. 

This area is also used for INPUT and GET incoming data. This 
is why INPUT and GET are illegal in direct mode — they require the 
same buffer as the statement itself. It also explains the 88-character 
limit on INPUT. GET places one byte in the first location, and a zero 
in the second to indicate the end of line/data. 

See related locations 7 ($7), 8 ($8), 11 ($B), 15 ($F), and 122 
($7A). 

Location Range: 601-630 ($250-276) 

File Number, Device Number, and Secondary Address Tables 

The three tables in this area can store up to ten one-byte entries, 
each representing an active Input/Output file. When an I/O file is 

n 
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opened, its logical file number is placed in the table at location 601 
($259), its device number in the table at location 611 ($263), and its 
secondary address into the table at location 621 ($26D). The entry r -, 

for each fUe occupies the same position in each of the three tables. If LJ 

logical file number 8 is the second entry in the file number table, its 
device number and secondary address will also be the second entries -~ 

in those tables. When a device is OPENed, its information is added [_J 

as the last entry in the table. The value of location 152 ($98) is 
increased by one to indicate that there is one more active I/O file. 
CLOSEing a device decreases location 152 ($98) by one, moving 
higher entries down one position, thus eliminating that device's 
entry. 

601-610 $250-262 LAT 

Open logical file number table. Ten one-byte entries. 

The OPEN, CLOSE, FNDFLNO, and SETFLCH routines set up, 
clean up, and locate information in this table. 

Note that the CLALL routine simply zeros location 152 ($98) to 
empty these tables. 

This location corresponds entry-for-entry to the tables at 611 
($263) and 621 ($26D), with location 152 ($98) usually serving as 
the index. 

If the file number is greater than 127, a linefeed character is sent 
to the file following any carriage return. 

See also locations 19 ($13), 152 ($98), and 184 ($B8). 

See Appendix D for a device, secondary address, and status 
codes table. 

6U-620 $203-260 FIIIT 

Open device number table. Ten one-byte entries. 

This table's entries correspond to those at locations 601 ($259) 
and 621 ($26D). Location 152 ($98) usually is the index. 

Related locations are 73 ($49), 153 ($99), 154 ($9A), 184 ($B8), 
and 186 ($BA). 

621-630 $200-270 OJIT J 

Open secondary address table. Ten one-byte entries. 

This table corresponds entry for entry to the tables at 601 ($259) [ , 

and 611 ($263), with 152 ($98) usually being the index. U 

Locations 184 ($58) and 185 ($39) are also related. 

031-040 $277-200 KEYD Q 

(handy location) 
Ten-byte keyboard buffef.; 

The IRQ driven routine causes SCNKEY to fill this buffer as l_j 
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it detects keystrokes with VIA 2. The Kernal routine LP2 at location 
58831 ($E5CF) empties characters from the keyboard buffer and 
ri maintains the count of characters in the buffer. Location 198 ($C6) is 

' updated to contain the number of characters in the keyboard buffer 

to a limit of ten. Keys pressed after the limit has been reached are 

n ignored, unlike PETs that started over from the beginning. GET and 

INPUT retrieve data from this buffer, decrementing the count of 
characters and shifting the remaining characters down. This buffer is 
First-In-First-Out (FIFO). 

If an INPUT or GET command is issued while characters are 
already in this buffer, the characters will become part of the data 
stream retrieved. You can prevent this by POKEing a zero into loca- 
tion 198 ($C6). 

By storing the appropriate number in 198 ($C6) and placing the 
desired characters in the keyboard buffer, you can program simu- 
lated keyboard entry. Be sure to include the ending carriage return in 
the count and buffer. See the note at 649 ($289) about exceeding ten 
characters. 

Unfortunately, there is no pointer to the keyboard buffer, so its 
location is not changeable. 

See location 153 ($99), input device number, for instructions for 
reading tape as though it were the keyboard. A disk doesn't work in 
the method described for tape. When disk needs to be read as the 
keyboard, you can either create a tape of the information or use the 
dynamic keyboard method of displaying the lines on the screen and 
entering a carriage return over them. 

By putting multiple carriage returns in the keyboard buffer, 
clearing the screen, carefully placing lines on the screen, homing the 
cursor, setting 198 ($C6) to the number of carriage returns, and endu- 
ing the program, the lines on the screen can be read just as though 
they were entered at the keyboard. Careful placement of the lines on 
the screen is crucial in using this feature. You must avoid BASIC 
messages. 

The following program can be used to create DATA statements 
from the contents of memory, or modified to perform other dynamic 
f~| keyboard program functions, such as reading from disk and building 

program lines to be entered. The routine is short and may be easily 
appended to another program. It's handy for converting ML routines 
rn of custom character set pixel maps into DATA statements, as well as 

' ' serving as an excellent example of the concept arni a model for fur- 

ther expansion. Dr. Harald Under authored a PET version of this 
routine in "Basically Useful BASIC: Automatic DATA Statements ioi 
CBM and Atari" in COMPUTEl's October 1981 issue. I've modified 
his routine for the VIC-20. Because of its obscurities, I've included an 
explanation of each statement following the routine. 
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Program 3-1. DATA Statements from Memory 

1 INPUT "START ADDRESS", -A : INPUT "END ADDRESS" ;E - - 
{SPACE}: Z = 2000 U 

2 PRINT"{CLR}{2 DOWN} "Z"DATA''' ; : IF A > E THEN END 

3 FOR A = A TO A+15 + (E<A+15) * (A+15-E) 

4 PRINT MID$(STR$(PEEK(A)),2)","; : NEXT 

5 PRINT" {LEFT} " : PRINT "A="A" :E="E" :Z="Z+10" :GOT 
02 {HOME} "; 

6 P0KE631,13 : POKE 632,13 : POKE 198,2 : END 



u 



Here's how this routine works: 

Line Function 

1 Obtains the range of memory to be stored into DATA 
statements and sets the beginning line number to be 
generated at 2000. It may be tailored to your own 
needs. 

2 The screen is cleared and the cursor positioned on the 
third line. The line number and the word DATA are 
printed there. If the starting address exceeds the end- 
ing address, the program ENDs. 

3 ! Insures that no more than 16 numbers appear on aiijl, 

one DATA stalgmejit, taking: into account the fact thstl 
the ending address may shorten that number. This K^ 
may bft replaced with your own statement to ins,jir# 
that the logical line leagbkof 88 is. not exqeededP 

4 PRINTS the ntmiber PEEKed from rnemorp 

5 When the FOR loop ends, delete the last comma, and 
format the next direct statement that has all the nec- 
essary variables specified for reentering the program at 
line 2. The lines appear such as: 2000 DATA 
17,5,28,27,198,182,102,55,72,91,244,7,67,212,1,187 and 
A=844:E= 857 :Z= 2010 :GOTO"home". The home 
is needed to safely position the READY message BASIC 
issues when the program ends. 

6 Two carriage returns are entered into the keyboard , 
buffer to simulate the keyboard entry of the two direct LJ 
lines just PRINTed to the screen. The count of those 

(2) is put into the buffer counter. The program ends 

with the cursor in the home position. BASIC displays | j 

READY on the next line and puts the cursor on the 

line of our DATA statement. The first carriage return 

in the keyboard buffer is seen and line 2000 is stored | I 

in the program area. The cursor is placed on the next 

line and the second carriage return is seen and that 

line is executed, causing the program to be reentered at f j 
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line 2 with the needed variables set to the correct val- 
ues. The process continues until the end address is 
reached. 

Here's a summation of the RAM locations related to keyboard 

processing: 

145 ($91) Keyswitch PIA: bottom keyboard row scan 

197 ($C5) Matrix coordinate of last key pressed 

198 ($C6) Number of characters in keyboard buffer 

203 ($CB) Matrix coordinate of current key pressed 

204 ($CC) Cursor blink switch 

208 ($D0) Flag indicating if input from screen or 

keyboard 

212 ($D4) Flag to indicate if within quote marks 

216 ($D8) Number of outstanding inserts 

245 ($F5) Pointer to keyboard table being used 

— > 649 ($289) Size of keyboard buffer 

650 ($28A) Keyboard repeater flags 

651 ($28B) Delay before other than first repeat of key 

652 ($28C) Delay before first repeat of key 

653 ($28D) Current SHIFT keys pattern 

654 ($28E) Previous SHIFT keys pattern 

— ^ 655 ($28F) Pointer to the keyboard table setup routine 

657 ($291) Flag to enable/disable SHIFT/Commodore 

switch 

641-642 $281-282 MEMSTR 8/16 ($8/18) 

(handy location) 
Pointer to the start of user RAM memory. 

At power-on/reset, the Kemal INITMEM* routine finds the first 
RAM location above address 1023 ($3FF) and saves that address 
here. After BASIC has been started, by the COLDST* routine, this 
location has no further use, as BASIC uses location 43 ($2B) for its 
start-of-memory pointer. 

n For an unexpanded VIC-20, the value here is 4096 ($1000). 

With a 3K expansion, the value is 1024 ($400), and vdthout a 3K 
expansion but with 8K or more of expansion added, this location 
contains 4608 ($1200). 

Here's a routine that you can use in direct mode or in a program 
by itself to cause the VIC-20 to think that it has no ^cpansion mem- 

— ory available. It de-expands the VIC-20. 

' ' POKE 44,l6:POKE 56,30:POKE 642,16:POKE 644,30:POKE 

648,30:POKE 36866,150:POKE 36869,240:POKE 4096,0:SYS 58232 

r~| You can then use any expansion RAM for your own purposes. 
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When you wish to re-expand the memory, use: SYS 64802. 

See Appendix E for details of the effect that adding expansion/ 
memory has on this pointer, related pointers, and how to adjust for 
this in a program. 

The routine MEMBOT may be used to read/set this pointer. 
Reference to the MEMBOT routine is on page 195 of the VIC-20 Pro- ^'■. 
grammer's Reference Guide. i ! 

643-644 $283-284 MEMIII6lf 6/30 (SO/IE) 

(handy location) 
Pointer to the end of user RAM memory plus one. 

At power-on/reset, the Kemal INITMEM* routine finds the last 
RAM location above 1024 ($400) and saves that address here. After 
BASIC has been started, by the COLDST* routine, this location is 
altered only by an OPEN or CLOSE of an RS-232 device. When that 
happens, this pointer is lowered 512 bytes to create two 256-byte 
buffers for Input/Output. A CLR is also issued by BASIC. Note: This 
may destroy any high-RAM-resident ML code. BASIC uses location 
55 ($37) or 56 ($38) for its end-of-memory pointer. See those loca- 
tions for a sample program to reserve space at the beginning and/or 
end of BASIC storage for ML or other uses. 

The normal value for this pointer for an unexpanded VIC-20 is 
7680($1E00). 

See Appendix E for details of the effect that adding expansion 
memory has on this pointer, related pointers, and how to adjust for- 
this in a program. 

The routine MEMTOP may be used to read/set this pointer. 
Refer to page 196 of the VIC-20 Programmer's Reference Guide. 

64S $28S TIMOUT 

(user storage) 
■ Serial: timeout enable/disable flag. 

Regardless of the description on page 205 of the V7C-20 Pro- 
grammer's Reference Guide and the fact that SETTMO sets this loca- 
tion from the .A passed to it, no reference has been found to this \ , 
location. Serial timeout is determined with the serial-clock-in line ' — ' 
(VIAl PAO) in the VIC-20 and this location does not disable or 
enable that. i , 

The Commodore 64 User's Guide notes that this location is used 1 ! 

only with the IEEE-488 expansion card. 



$286 G6L6R J 

(handy location) 
Current foreground color selected by color keys.; 

This address is initialized to color 6 (blue) by INITSK* routine at ' j 
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power-on/reset or RUN/STOP-RESTORE. When the Kernal is 

about to put a character to the screen, this location's content is 
n. stored in the corresponding color map location. 

The routine COLORSET* uses the table COLORTBL* to find the 

appropriate color code to store in this location when the CTRL and 
r~l color keys are pressed. 

' You can POKE this location with values from to 7 to change 

the color of all subsequent printed characters. Valid color codes oni 

the VIC are: 

Black 
White 1 
Red 2 
Cyan 3 
Purple 4 
Green 5 
Blue 6 
Yellow 7 

The multicolor bit (bit 3; add 8 ($8) to the color) may be set, 
causing an interesting effect — useful when you've defined your own 
custom character sets. The color is selected in multicolor mode by bit 
pair values of 00, 01, 10, or 11. 

See locations 36879 ($900F) and 36878 ($900E) for additional 
color setting locations. 

See locations 243 ($F3), 647 ($287), 217 ($D9), and 201 ($C9) 
for a line/column/cursor pointer summation. Also see Appendix E • 
for details on screen and character pixel map relocation. 

647 $287 GDCOL 

Cursor: original color at this screen location. 

Every time the cursor is blinked by the IRQ routine, location 
206 ($CE) is updated and the color map code for the current screen 
location is stored at this address. 

See locations 243 ($F3), 646 ($286), 217 ($D9), as well as 201 
($C9), for a line/column/cursor pointer summation. Also see Appen- 
dix E for an explanation of screen and color map relocation. See 
location 36879 ($900F) for a color code chart. 

648 $288 HIBASE 

(handy location) 
Screen map RAM page number. 

This byte is set by the power-on/reset routines to the page 
number of the beginning of screen RAM. You can multiply the con- 
tents of this location by 256 to find the current location of the screen 
map RAM. On an unexpanded VlC-20, the screen is at 7680, and 
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this location contains 30 ($1E) (30*256=7680). 

This location is used as a basis for the screen line link table at 
location 193 ($C1) and helps to derive the screen line pointer at 
209-210 ($D1-D2). 

See locations 243 ($F3) and 217-241 ($D9-F1). You can also 
refer to Appendices E and G for details on screen relocation. 
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INlt 1$289 

(handy location) 
Maximum number of characters in the keyboard buffer. 

The normal value in this location is ten, the length of the key- 
board buffer at 631 ($277). This location is compared with location 
198 ($C6), which holds the number of characters in the keyboard 
buffer, in order to ignore key presses after the buffer is filled. 

You can increase this number to 15 since locations 641-64^ 
($281-285) are not normally used after BASIC is cold started. It rr^ 
be worth a try if you are programming the kejrboard buffer, ft) 

Using this line, location 198 ($C6) could be set to 15: 

POKE 649,15 : REM 15 character keyboard buffer 

If you lower this value to zero, the keyboard buffer is always 
empty since no characters can be stored in zero bytes. This has the 
effect of disabling the keyboard until the value is raised above zero. 

RUN/STOP-RESTORE resets this address to ten. 

See location 631 ($277) for a summation of the keyboard-related 
RAM locations. 

650 $28A RPTFLG 

(handy location) 
Keyboard repeater flags. 

This location is initialized to zero, which causes only the cursor, 
space bar, and INST/DEL keys to repeat. You can set this byte to: 

POKE 650,128 : REM ALL KEYS TO REPEAT 
POKE 650,64 : REM NO KEYS TO REPEAT 
POKH 650,0 : REM DEFAULT KlYS TO REPEAf 

See locations 651 ($28B) and 652 ($28C) for repeat timing 
values. 

See location 631 ($277) for a summation of the keyboard-related j j 

RAM locations. ' — 

651 $28B KOUNT ^ 

Delay before other than first repeat of key. uJ 

This is initialized to 6 once 652 ($28C), the first repeat delay 
counter, has been decremented to zero. Location 652 ($28C) is ^ ■ 

i I 
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reduced to zero when the same key is held down. Location 651 
($28B) is then decremented once each jiffy until it reaches zero. 
The key is then placed in the keyboard buffer, location 652 
($28C) is allowed to remain zero, and this location is reinitialized to 
4, allowing faster subsequent repeats. Therefore, the first repeat of a 
key will occur in about one-third of a second, with additional repeats 
occurring 15 times per second. 



$28C 

Delay before first repeat of key. 

This address's initial value of 16 is counted down every sixtieth 
of a second by each IRQ interrupt, as long as the same key is 
pressed. When zero is reached, the value in 651 ($28B) is 
decremented to zero on every jiffy that the key is still held down, 
then the key is duplicated in the keyboard buffer by the SCNKEY 
routine. The value 4 is then stored in location 651 ($28B), and this 
location is left with its value as zero so that following repeats occur 
rapidly. 

When a different key is pressed, this location is reset to 16 ($10) 
by SCNKEY and the whole repeat process begins again. 



(handy location) 
Current SHIFT keys patteriU 

This location is used to determine which keyboard table is used 
for converting the key pressed into an ASCII character. Different 
SHIFT patterns cause the selection of the appropriate character table. 
Location 245 ($F5) is then set as a pointer to the current table. The 
values and meanings in this location are: 



Table 3-1. Values in Location 658 ($28U) 






Contents of 


Dec Binary 


Keys being pressed this location 


00000000 


none 


60510 $EC5E 


1 00000001 


SHIFT 


60575 $EC9F 


2 00000010 


Commodore key 


60640 $ECEO 


3 00000011 


SHIFT + 






Commodore 


60510 $EC5E 
or 60575 $EC9F 
(until pressed again) 


4 00000100 


CTRL 


60835 $EDA3 


5 00000101 


SHIFT + CTRL 


60835 $EDA3 


6 00000110 


Commodore + 






CTRL 


60835 $EDA3 


7 00000111 


SHIFT + CTRL + 






Comm. 


60835 $EDA3 
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The Commodore/SHIFT key combination changes location 
36869 ($9005) to cause the next character set in ROM or RAM to be 
used, but keyboard decoding of the characters is done using the 
same keyboard table. 

The left and right SHIFT keys are not uniquely flagged. This 
value will be saved in 654 ($28E) for stabilization and to prevent the r , 

SHIFT/Commodore key combination from flipping back and forth i i 

between character sets without an additional pressing of those keys. 

The following statement uses the SHIFT key, which may bel; 
locked down, as a pause key. This is handy when many screeits of? -/ 
information are to be displayed, or you want to answer the phone ; 
during an exciting game. Simply add: i 

WMT 653,1,1 

to your program in the main loop. To resume the program, you only 
need to release the SHIFT key. 

The following sample program can be an aid to understanding 
the CTRL codes and cursor movement key values that are placed 
within quotes in a program. If you create a program file within the 
parameters of line 110 below, control key codes will be printed 
within brackets on the screen. You need to load this program, then 
your own, to see this effect. 

Progiam 3-2. Control Codes Displayed 

100 REM PRINT CONTROL KEYS IN [ ] (I.E., [CLR]) FR 

OM PROGRAM FILE CREATED WITH 
110 REM "OPEN 1,1,1: CMD 1: LIST: CLOSE 1' 

{2 SPACES}OR 'OPEN 8, 8, 8, "NAME, S, W" : CMD 8: CL 

OSE 8' 
120 DIMK$(255) 
130 READ K: IF K=0THEN150 
140 READ K$(K):GOTO130 

150 PRINT"{CLR}{2 D0WN}FILE NAME" : INPUTN$ 
160 PRINT"{2 DOWN} {RVS}T{ OFF} APE OR {RVS}D{0FF} ISK 

IN?" 
165 GETD$:IFD$<>"D"ANDD$<>"T"THEN165 ; 

170 PRINT" {2 D0WN}{RVS}P{0FF}RTR OR {RVS}D{0FF} ISK i_J 

OUT?" 
172 GETO$:IFO$<>"P"ANDO$<>"D"THEN172 

175 IF0$="D"THEN0PEN4,8,4,N$+".LXS,S,W" 

176 IFO$="P"THENOPEN4,4 
180 IFD$="T"THENOPEN5,1,0,N$ 

190 IFD$="D" THEN OPEN15,8,15: OPENS, 8, 5,N$+" ,S,R" 

200 IF D$="D"THEN INPUT#15,E,E1$, E2, E3 : IF EO0THE (_J 

N PRINT" {RVS}"E;E1$: CL0SE15; CL0SE4; END 
210 GET#5,X$ :ST%=ST: IFX$=CHR$ ( 34)THENQ%=ABS(Q%-1 ) 
220 IFX$=CHR$(13)THENQ%=0 
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230 IPQ%THEN IFLEN(K$ (ASC(X$) ) ) <>0THENX$=K$ (ASC(X$ 

rn 240 PRINT#4,X$? :IFST%=64THEN CLOSE 4: CLOSE 5: END 
' 250 GOTO210 

260 DATA5, "[WHT] " ,8, "CDISABLE2] " ,9, "[ENABLE2] " , 10, 
_, " [LF] " , 14 , •■ [LOWERCASE] " , 17 , " [CRSRDN] " 

n 270 DATA 18,"CRVSON]",19,"[HOME]",20,"CDEL]",28,"C 
RED] " , 29, " [CRSRRT] ".30, " [GRN] " 
280 DATA 31, "[BLU]", 131, "[LOAD/RUN]", 142, "[UPPERCA 

SE] " , 144, •• [BLK] " , 145 , " [CRSRUP] " 
290 DATA 146, "[RVSOFF]", 147, "[CLR]", 148," [INST] M 

56, "[PUR]" 
300 DATA 157,"CCRSRLFT]",158,"CYEL]",159,"[CYN]';,0 

See location 36869 ($9005) for programmed SHIFT of character 
sets or use the following PRINT statements: 

PRINT CHR$(14) : REM lowercase/uppercase (text set) 
PRINT CHR$(142) : REM uppercase/graphics (graphics set) 

Also see location 657 ($291) for a flag to enable or disable com- 
bined SHIFT and Commodore keys. 



654 $28E 

Previous SHIFT key pattern. 

This location is used in combination with location 653 ($28D) to 
debounce the special SHIFT keys. This will keep the SHIFT/Com- 
modore key combination from changing character sets back and 
forth during a single pressing of both keys. The values in this loca- 
tion are saved from location 653 ($28D). See location 653 ($28D) for 
the meaning of values in this location. You can also refer to location 
631 ($277) for a summation of keyboard-related RAM locations. 

6SS-656 $28F-290 KEYLOG 

Pointer to the default keyboard table setup routine. 

This location is used as an indirect jump pointer by the 
SCNKEY routine to the routine that determines which keyboard 
decoding table is used, based on the SHIFT key pattern in 653 
($28D). By changing this pointer after power-on/reset, you can inter- 
cept the provided routine or replace it altogether. The default routine 
is at location 60380 ($EBDC), which uses keyboard table vectors at 
60486 ($EC46) to access the tables starting at location 60510 ($EC5E) 
NORMKEYS*. You will probably want to model your routine after 
ij the default routine, or front-end it. 

The default routine in the Kemal stores the address of the table 
currently in use at location 245 ($F5). 

See location 631 ($277) for a summation of keyboard-related 
RAM locations. 
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$291 MODE 

(handy location) 
Flag to enable or disable combined SHIFT and Commodore keysE^ 

Values in this location are for enabled, 128 for disabled. 

Although this location's value is initially set to 0, a value of 128 
($80) here will disable the SHIFT and Commodore key combination 
from switching to the alternate character set. The SHIFT, Com- 
modore, and CTRL keys will work normally when pressed for any 
other purpose. 

You can use these program lines to disable or enable character 
set switching. Both a POKE statement and a PRINT statement have 
been included: 

POKE 657/128 : REM disable character set switchini 
PRINT CHR$(8) : REM disable character set switclung/ 
POKE 657,0 : REM enable character set switching - 
PRINT CHR$(9) : REM enable character set switching 

See location 36869 ($9005) for programmed SHIFT of character 
sets or location 653 ($28D), the current SHIFT pattern, for PRINT 
statements. 

658 $292 AUTODN 

Screen scroll-down enabled flag. 

This byte's value is set to to enable the scroll-down function 
when the computer is turned on. Any other value in this location 
disables the scroll down. 

This location flags whether the bottom logical line is dropped 
off the screen to make room for another physical line added to the 
current logical line. 

This function is temporarily disabled while characters are in the 
keyboard queue. 

See location 201 ($C9) for a summation of keyboard RAM 
locations. 

659 $293 MSICTR 

(possible user 
storage) 
RS-232: pseudo-6551 control register. 

This location specifies the RS-232 baud rate (the transmit/ 
receive speed), the word length in bits, and the number of stop bits. 
The VIC-20 emulates a 6551 UART chip with software. 

When device number two is opened, you can specify up to four 
characters in the filename which are copied to locations 659 ($293) 
through 662 ($296) and correspond to the RS-232 control register, 
command register, and nonstandard bit-timing values. Only the first 
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of the four characters is required, and tjrpically only the first two are 
_. specified. 

I I If the command 6551 command register is not specified, the 

defaults are: disabled parity, full duplex, and three-line handshaking. 
To set this location: 

n OPEN n,2,0,CHR$(a;)+CHR$(x) 

where iv is the value for this location, x is the value for location 660 
($294), and n is the file number. Remember that a file number 
greater than 127 causes a linefeed to follow any carriage returns 
sent. 

The meaning of the bits in this location is: 

ftble 3-2. Locatton 659 Bit Values 



Bit 


Use 


Meaning 






7 


stop bits 


= 1 stop bit, 1 = 2 stop bits 






6-5 


word length 


00 = 8, 01 = 7, 10 = 6, 11 = 


5 




4 


unused 








3-0 


baud rate 


0000 = user* 0001 = 50 


0010 


= 75 






0011 = 110 0100 = 134.5 


0101 


= 150 






0110 = 300 0111 = 600 


1000 


= 1200 






1001 = 1800 1010 = 2400 


1011 


= 3600* 






1100 = 4800* 1101 = 7200* 


1110 


= 9600* 






1111 = 19,200* 







* indicates NI (not implemented). If the baud rate bits are 0000, the user 
timing at location 661 ($295) was designed to be used, but this is not 
implemented. 

Here are the positions and values for each of the eight bits that 
make up any byte. 



Table 3-3. Bit Positions and Values 

Table of bit positions / decimal values / hex values 

BIT 7 6 5 4 3 2 1 

DEC 128 64 32 16 8 4 2 1 
HEX $80 $40 $20 $10 $08 $04 $02 $01 



f— For example, the statement OPEN 2,2,0,CHR$(6+32)+CHR$ 

M (32 + 16) sets this location to 38 (6+32). In binary, this looks like 

0010 0110. Referring to Table 3-2, you can see that this sets the 
baud to 300 (6) and the word length to seven bits (32), with one 
[^ stop bit. 
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When a word length less than eight is chosen, the remaining 
bits of the byte are set to zeros. ML should be used for rates over 
300 baud. 

See page 251 of the VIC-20 Programmer's Reference Guide, loca- 
tions 663 ($297), 660 ($294), and 37136 ($9110). 
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$294 MnCDR U 

(possible user 
storage) 
RS-232: pseudo-6551 command register. 

This location specifies the RS-232 parity, for data checking; 
duplex mode, to determine if talking and listening occur simulta- 
neously; and the handshaking protocol used, to insure that the same 
protocol is used on the other end of the transmission. (If it's not the 
same protocol, it's like one person extending his left hand and the 
other person extending his right to shake hands.) 

The VIC-20 emulates a 6551 UART chip with software. 

See location 659 ($293) for a description of how this location is 
set with the OPEN statement. Setting with the OPEN statement is 
optional. 

The bits in this location represent: 

Table 3-4. LoGation 660 Bit Values 



Bit 


Use 


Meaning 




7-5 


parity 


xxO = disabled 001 = odd Oil 
101 = mark 111 = space 


= even 


4 


duplex 


= full 1 = half 




3-1 


unused 









handshaking 


= 3 line 1 = x line 





There seems to be a problem with x line handshaking in the 
VIC-20. It appears that the code at 62738 ($F512) and 61428 ($EFF4) 
is checking the wrong VIA port. If not otherwise set, the zero in this 
location will default RS-232 to no parity, full duplex, and three-line 
handshaking. 

Using the example OPEN statement found in location 659 
(OPEN 2,2,0,CHR$(6+32)-l-CHR$(32-H16)), you can see how to set 
location 660. Note that in our example, location 660 is being set to 
48' (32 -h 16), which is expressed as 0011 0000 in binary. This sets 
this register to odd parity (32) and half duplex (16). Refer to Table 3- 
3 for bit positions and values to see how the bit values translate into 
these register settings. 

See page 251 of the y/C-20 Programmer's Reference Guide, as 
well as locations 663 ($297) and 37136 ($9110). 
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661-662 $295-286 M51AJB 

(user storage) 
n RS-232: nonstandard bit timing specification. 

This location is used to store the user-desired baud rate. 

See location 659 ($293), the RS-232 control register, for a 
rn description of how to set this location. Unfortunately, this is not 

implemented in the VIC-20, since RS-232 routines never reference 
this location. 

663 $297 R8$TilT 

(possible user 
RS-232: status register. storage) 

This status register is erroneously zeroed by ST if the current 
device in location 186 ($BA) is device 2. 

The READST routine at location 65111 ($FE57) that is called by 
the vector at 65463 ($FFB7) zeros this byte and loses its contents. 

Use RS=PEEK(663):POKE 663,0 to obtain the RS-232 status. 

The Commodore 64 READST Kemal routine returns the status 
in .A as well as zeroing the byte, but this was overlooked in the 
VIC-20. The .A returned is zeroed in the VIC. 

The user is responsible for checking and taking appropriate 
action for status bits 1, 2, 4, and 7. For bit 7, you'll want to stop 
sending and issue a GET#2 to see what the other end is trying to 
say. If bit 2 is being set, this is an indication that you're not issuing a 
GET#2 fast enough to clear the buffer. Even with BASIC, you 
should be able to keep up at 300 baud. Bit 2 or 1 should cause you 
to send again the last PRINT#2 byte. 

Here's a description of this location's bit values and their 
meanings: 

Table 3-5. Location 663 Bit Values 





Bit 


Decimal 


Hex Meaning 




7 


128 


80 BREAK detected 


] 


6 


64 


40 DATASET READY message missing 






modem is not free for next task 




5 


32 


20 unused 




4 


16 


10 CLEAR TO SEND message missing 


1 






(see below) 






modem is not ready for data to be 








sent to it 


n 


3 


8 


08 unused 


2 


4 


04 receive buffer overrun 




1 


2 


02 framing error 







1 


01 parity error 


n 




Because of the 


coding problem mentioned at 660 ($294), the 



clear to send missing bit will never be set. 
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S298 BmUM 

(possible user 

storage) [_J 

RS-232: number of bits to be sent/received. 

This location is used to indicate how many zeros must be added — 

to the data character to pad its length to the word length specified in |_| 

location 659 ($293), the RS-232 control register. 

Also see locations 180 ($B4) and 168 ($A8). 

665-666 $288-28A BAUD6F 

(possible user 

storage) 
RS-232: system clock divided by baud rate. Result is expressed in 
microseconds. 

This location contains the amount of time needed to send one 
bit of information. 

• 666 ($29A) is computed by: 
INT(((CLOCK/baud rate)/2) - 100)/256 

• 665 ($299) is computed by: 
((CLOCK/baud rate)/2) - 100 - (PEEK(662)*256) 
where CLOCK= 1,022,730 for NTSC (USA) or 
1,108,224 for PAL (European) 

The OPENRS* routine performs these calculations when the RS- 
232 device is OPENed. The computations are speeded by the Kemal 
using the provided BAUDTBL* table. 

The resulting figures are copied to locations 37140-37141 
($9114-9115) and 37144-37145 ($9118-9119), which are VIA I's 
timers, when needed. 



$29B RIDBE 

(possible user 
storage) 
RS-232: dynamic index to the end of the receive buffer. 

This pointer references a 256-byte buffer and is used to place [_J 

data in that buffer. The receive buffer is a wraparound buffer. At any 
time, the starting and ending locations can be anywhere within the 
256-byte buffer. If 

If this location and 668 ($29C) are equal, then the buffer is •— ^ 

empty; when this location's value is one greater than 668 ($29C), the 
buffer is full. j | 

u 
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n 671-672 

p— I 

668 $29G MDBS 

(possible user 
P] storage) 

RS-232: dynamic index to the start of the receive buffer. 

,_ This pointer is used to remove data from the receive buffer. 

n If location 667 ($29B) and this location contain the same value, 

the buffer is empty. 

This byte is added to the pointer at location 247 ($F7) when 

storing data in the transmit buffer. 



n 
n 



n 



(possible user 
storage) 
RS-232: dynamic index to the start of the transmit buffer. 

This pointer is used to put data into the buffer and to detect an 
empty or overflow of the transmit buffer. 

If this location and 668 ($29C) are equal, the buffer is empty; 
when this location's value is one greater than 668 ($29C), the buffer 
is full. 



670 $29E 

(possible user 
storage) 
RS-232: dynamic index to the end of the transmit buffer. 

This pointer is used to remove data from the buffer. 

If 669 ($29D) and this location contain the same number, the 
buffer is empty. 

This index is added to the pointer in location 249 ($F9) when 
storing data in the transmit buffer. 

671-672 $29F-2A0 IRQTMP 

(possible user 
storage) 

Temporary SAVE area for the normal IRQ vector during tape 1/ 

O. 

The normal vector, held in location 788-789 ($314-315) for the 
IRQ routine at 60095 ($EABF), is stored here during tape reads and 
writes by the TAPE routined It's restored by the TNIF routine. The 
table at 65009 ($FDF1) contains the three IRQ vectors for tape. The 

_ vectors are at locations 63886 ($F98E), 64523 ($FC0B), and 64680 

n ($FCA8). 

The tape I/O IRQs skip the update of the clock, the STOP key 
test, and other IRQ duties during the actual moving of the tape. The 
tape routines call their own routine that tests for a pressed STOP 
key. 
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673-767 



If you've changed the IRQ vector at 788-789 ($314-315), your 
vector will be restored from here after the tape I/O is completed. 

The TSTOP routine, which tests for the STOP key, puts a zero 
in location 672 ($2A0) if the STOP key was pressed. 

673-767 $2A1-2FF U8RVCTRS* 

(user storage) 
User indirect vectors or other storage area. 

Ninety-four bytes of memory are available in this area to the 
user for 47 user-program indirect link addresses or for any other pur- 
pose. This is an excellent area to store a short ML routine without 
having to alter BASIC'S pointers. 

Note that locations 673-678 ($2A1-2A6) are used in the Com- 
modore 64, so refrain from using these if you're writing a program 
meant for both the VIC-20 and the Commodore 64. 

Location Range: 768-778 ($306-$3BA) 

BASIC Indirect Vectors 

768-778 $36e-$36A 8VECT6RS 

(handy location) 
Table of indirect BASIC vectors. 

In these locations, BASIC provides a table of the vectors that di- 
rect processing to the appropriate routine. These vectors are used by 
BASIC at the start of a routine. The instruction at the routine's entry 
point is a jump from the address contained in the corresponding vec- 
tor location. This causes a branch back to the instruction following 
the jump. For example, the entry point for the BASIC error message 
handler is at location 50231 ($C437). The instruction at that address 
is a JMP to $0300. The vector at $0300 points to location 50234 
($C43A), which is the next instruction after the JMP. You can change 
these vectors to replace or front-end the BASIC routines. 

Here are the individual vectors, their locations, labels, and 
descriptions: 

768-768 $388-361 IERR8R 

Vector to the routine to print a BASIC error message from a 
table. 

This vector points to the routine ERROR at location 50234 
($C43A). 

778-771 $382-383 IMAIN 

Vector to the BASIC main routine. Execute or store statement. 

The routine MAIN at location 50307 ($C483) is pointed to by 
this vector. 
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772-773 $304-303 

Vector to the BASIC tokenization routine. 

This vector points to the routine CRNCH at location 50556 
($C57C). 

774-775 $306-307 IQPLOP 

Vector to the BASIC routine that expands and prints tokens. 

The vector points to the QPLOP routine at address 50970 
($C71A). 

776-777 $308-303 IGONE 

Vector to the BASIC routine that executes the next BASIC token. 

This vector points to the routine GONE at location 51172 
($C7E4). 

778-773 $30A-30B lEVAL 

Vector to the BASIC routine that evaluates a variable 

Vector to the routine EVAL at 52870 ($CE86). 

Location Range: 780-783 ($30C-$30F) 

Register Save Area 

The BASIC SYS command uses this area to save and load the 
6502 registers between SYS statements. For example, SYS 60074 
loads the values stored in this area into the appropriate registers and 
then performs a jump to the target location. When the ML instruc- 
tions issue an RTS (return), the routine that processes the SYS state- 
ment stores the returned registers here, and BASIC continues wdth its 
next statement. 

This feature allows you to set up the necessary registers prior to 
SYSing to a Kernal, BASIC, or ML user routine. It also lets you 
examine or save the resulting registers and pass them onto another 
routine via subsequent SYS commands. 

Another example will clarify this. If you wanted to place the 
cursor and a red dollar sign on the seventh physical line in the 
fourth column, you could use the following routine: 

• Position the cursor and obtain screen location 
POKE 783,0 Clear the processor flag register (.P) 
POKE 781,6 Select the 7th line in .X register 
POKE 782,3 Select the 4th column in .Y register 

SYS 65520 Call the PLOT Kernal routine vector. Kernal moved 
cursor to line 7, column 4, and updated 209-210 and 211 
(line-col.) 

• Put the dollar sign in the screen location 
L1NE=PEEK (209)+PEEK(210)*256 Start of line address 
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ADDR=LINE+PEEK(211) Add column to start of line 
POKE ADDR,36 Place a dollar sign on the screen 
• Color the dollar sign red 
SYS 60082 Call the Kemal to determine color address. Kernal 
updated locations 243-244 to color address 
COLOUR=PEEK (243)+PEEK(244)*256 Start of line color. 
COLOUR is speeled with a u to avoid the OR command 
POKE COLOUR+PEEK(211),2 Dollar sign's color address 

The routine can fit in two BASIC program lines and can be gen- 
eralized so that you can use it as a GOSUB subroutine. Using Kemal 
routines to do your work for you is both faster and easier than doing 
it yourself, once you know how to pass and retrieve the needed 
parameters in the 6502 registers. Suddenly all the Kemal routines 
are now available to you in a BASIC program. 

These are the individual registers in this area: 



780 

6502 .A register 

781 

6502 .X register 



$30C 



$30D 



(handy location) 

SXREG 

(handy location) 



(handy location) 
6502 .Y register 

783 $30F SPREG 

(handy location) 
6502 .P processor status register 

Take a look at Table 3-6 for details on interpreting the .P flags. 



Table 3-6. 


.P Register Flags 










For ML Programmers 




Bit 


PLP 


Bit 


CMP To 


BRANCH 


NumDec Hex 


FLAG Name Sets 


Sets 


Sets 


CLEAR/SET 


ON 0/1 


7 128 $80 


N Negative X 


X 


X 


-/- 


BPL/BMI 


6 64 $40 


V overflow X 


X 


- 


CLV/— 


BVC/BVS 


5 32 $20 





- 


- 


-/- 


-/- 


4 16 $10 


B Break X 


- 


- 






3 8 $08 


D Decimal X 


- 


- 


CLD/SED 


— / — 


2 4 $04 


I Interrupt X 


- 


- 


CLI/SEI 


-/- 


1 2 $02 


Z Zero X 


X 


X 


-/- 


BNE/BEQ 


1 $01 


C Carry X 


- 


X 


CLC/SEC 


BCC/BCS 
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788-789 



784-787 $318-313 P83FREE* 

(user storage) 
ri Four bytes of unused page 3 space. 

On the Commodore 64, locations 785-786 are used for the USR 
_ jump vector described at location 1-2 ($1-2). Location 784 contains 

n the JMP opcode. You should remember this when you're writing 

programs for both machines. 

LocaUon Range: 788-818 ($314-$333) 

Kernal Indirect Vectors 



788-818 $314-$333 

(handy location) 
Table of 16 Kernal indirect vectors. 

This location range contains a 32-byte table of the vectors that 
direct the processing to the appropriate Kernal routine. At power- 
on/reset, or when pressing the RUN/STOP-RESTORE keys, the 
RESTOR routine copies the ROM copy of these vectors at VEC- 
TORS* into this location range. The VECTOR routine can be called 
to read or load these vectors, allowing you to front-end or replace 
vectored Kernal routines. See page 209 of the VIC-20 Programmer's 
Reference Guide for the description of how to use the VECTOR rou- 
tine. Many of the routines that these vectors point to are also 
described in the reference guide, beginning on page 184. 

Location 195-196 ($C3-C4) is used as a base address during the 
process of copying the ROM based vectors to this location range. 

The 16 indirect vectors are: 

788-788 $314-315 GINV 

(handy location) 
Vector to the IRQ interrupt routine at 60095 ($EABF). 

This location is where you would put the address of your own 
ML IRQ routine or front-end to be executed every jiffy. You must 
end your front-end routine with a JMP to location 60095 ($EABF). 

The IRQROUT* routine determines if it was entered for a RUN/ 
STOP-RESTORE key press or an elapsed jiffy and jumps off this 
vector. 

You can POKE 37166,127 to allow this location to be changed 
in BASIC without being interrupted, or POKE 37166,192 to reenable 
the IRQ interrupts. 

The routine that first receives the IRQ interrupt, prior to the rou- 
tine that is vectored here, saves .A, .X, and .Y registers on the stack. 
To restore these registers at the end of your routine, PLA the reg- 
isters and issue an RTI instruction, or proceed with the normal IRQ 
routines. 
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U 

u 



u 

To disable the timer updating and STOP-key test by the IRQ 
routine, POKE 788,194. This will skip the timer update and key- 
board scan routines by entering IRQ after the JSR for them. To I ' j 
reenable these functions, POKE 788,181. See the vector at 808 ($328) '— ' 
to disable only the STOP key. 

Location 671-672 ($29F-2A0) is used to save this vector during j~| 

tape processing and to restore this vector afterward. LJ 

The following program demonstrates the use of this location to 
"wedge" in your ovm routines in front of the normal target of a 
vector. 

Program 3-3. IRQ Wedge 

10 REM *** SAMPLE IRQ WEDGE THAT TURNS OFF QUOTE A 

ND INSERT MODE BY DETECTING Fl KEY *** 
20 REM +++ ADAPTED FROM AN IDEA BY SHELDON LEEMON 

{SPACE} FOR THE C64. +++ 
30 T=256*PEEK(56)+PEEK(55)-25 : HI%=T/256 : LO=T-H 

I%*256 : REM FIND TOP OF RAM-25 (T) 
40 FOR I=T TO T+24 : READ D : POKEI,D : NEXT : REM 

STORE INTERRUPT WEDGE IN HIGH RAM 
50 POKE 56,HI% : POKE 55, LO : REM LOWER TOP OF RAM 

POINTER TO HIDE THE WEDGE ROUTINE 
60 POKE ai4,PEEK(788) : POKE 815 ,PEEK( 789 ) : REM S 

AVE OLD IRQ VECTOR FOR INDIRECT JUMP 
70 POKE 37166,127 : REM DISABLE IRQ INTERRUPT WHIL 

E CHANGING ITS VECTOR 
80 POKE 788, LO : POKE 789, HI % : REM POINT THE IRQ 

{SPACE} VECTOR TO THE WEDGE 
90 POKE 37166,192 : NEW : REM ENABLE IRQ INTERRUPT 

AND DISCARD THIS PROGRAM 
100 DATA 165,215,201,133,208,16,162 
110 DATA 0,134,212,134,199,134 
120 DATA 216,232,134,198,169,20 
130 DATA 141,119,2,108,46,3 
140 ### ASSEMBLER CODE IN WEDGE ### 
150 LDA $D7. ;LAST KEY PRESSED 
160 CMP #$85 ;F1 KEYPRINT 
170 BNE OUT {2 SPACES}? EXIT IF NOT 
180 LDX $#00 ;TURN OFF 

190 STX $D4{2 SPACES}; {2 SPACES}QUOTE MODE 
200 STX $C7{2 SPACES}; {2 SPACES } REVERSE MODE 
210 STX $D8{2 SPACES}; {2 SPACES} INSERT COUNT 
220 INX{6 SPACES} ;PUT A 1 IN 

230 STX $C6{2 SPACES}; {2 SPACES }KBD BUFF COUNT 
240 LDA $#14 ;AND A DELETE FOR 
250 STA $0277 ;THE Fl KEY 
260 OUT JMP ($032E) ;BACK TO THE NORMAL ROUTINE 
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790-791 $316-317 

__ Vector to the BREAK interrupt routine at 65234 ($FED2). 

• I When the RUN/STOP and RESTORE keys are pressed simuha- 

neously, or an ML BRK instruction ($00) is executed, this vector 
,— . points to the address of the routine at location 65234 ($FED2). See 

n the BREAK* routine for details of the processing performed. 

792-793 $318-319 NMIIIV 

Vector to the NMI interrupt routine at 65197 ($FEAD). 

The NMI (Non-Maskable Interrupt) can be caused by the RUN/ 
STOP-RESTORE keys and VIA timer interrupts. Multiple NMI inter- 
rupts and IRQ interrupts can occur while the first NMI is being pro- 
cessed. This entry point skips the preceding SEI instruction that 
disables IRQ interrupts. 



794-79S $31A-31B 

Vector to the open logical file routine OPEN at 62474 ($F40A). 



796-797 $31C-31D 

Vector to the close logical file routine CLOSE at 62282 ($F34A). 



798-799 $31E-31F 

Vector to the open input channel routine CHKIN at 62151 ($F2C7). 

800-801 $320-321 ICKOUT 

Vector to the open output channel routine CHKOUT at 62217 
($F309). 

802-803 $322-323 ICLRGH 

Vector to the reset all channels routine CLRCHN at 62451 ($F3F3). 



804-805 $324-325 

Vector to the input from device routine CHRIN at 61966 ($F20E). 

n 806-807 $326-327 1B80UT 

Vector to the output to device routine CHROUT at 62074 ($F27A). 

n 808-809 $328-329 ISTOP 

' ' (handy location) 

Vector to the test STOP key routine STOP at 63344 ($F770). 

f"! This vector points to the address of the routine that tests the 

' STOP key. The STOP key can be disabled by a POKE 808,100. This 

does not disable the RUN/STOP-RESTORE conabination, however. 
n To reset the STOP key test, POKE 808,112. 
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810-811 $32A-32B 16ET1II ^ 

Vector to the get from keyboard routine GETIN at 61941 ($F1F5). 

812-813 $32C-32D ICLALL ^ 

Vector to the abort all files routine CLALL at 62447 ($F3EF). 

814-81S $32E-32F USRCMD U 

(user storage) 

This location seems to be a holdover from earlier PET comput- 
ers, when the built-in machine language monitor would JMP 
through this vector when it encountered a command it did not 
understand. A user vector can be placed here instead. 

This vector is initialized to serve as a vector to the BREAK inter- 
rupt routine BREAK at location 65234 ($FED2). 



-817 $330-331 ILOAD 

Vector to the load from device routine LOAD at 62793 ($F549). 



818-818 $332-333 

Vector to the Kernal save to device routine SAVE at 63109 ($F685) 

826-827 $334-338 USRGMDS 

(user storage) 
Four user vectors or eight bytes of other data may be stored here. 

828-1018 $33G-3FB TBUFFR 

(handy location) 
Tape buffer area, 192 bytes, for headers and BASIC file data. 

This area of memory is used to read and write tape headers regard- 
less of the format of the tape data, and to buffer a BASIC program's 
data for INPUT*, GET#, and PRINT* commands when using the 
tape device. Each use of this area will be explained below. 

Also, this area has traditionally been a favorite place to store 
short ML routines. Of course, these routines are erased whenever 
tape I/O is done. Serial devices do not use this area. 

When the Kernal LOAD, VERIFY, and SAVE routines are called 
from ML or BASIC SYS statements, this area is used for the tape 
header but not for the data going to or coming from the tape. When j— j 

calling the Kernal LOAD or VERIFY routine, a pointer to the begin- Li 

ning of the area used for LOADing is stored in location 172-173 

($AC-AD). When SAVE is called, an additional pointer to the end, 

plus one, of data to be saved is stored in location 174-175 ($AE-AF) {_J 

by the Kernal. These pointers passed to the Kernal may point to any 

convenient location, except when saving data from above location 

32768 ($8000) to tape. See location 172 ($AC) for an explanation of M 
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this limit. The contents of RAM are then saved to the tape in one 
long continuous block. 
f~t BASIC uses the same Kernal routines in the same manner for 

' ' SAVE, LOAD, and VERIFY of a BASIC program. BASIC'S pointer at 

location 43-44 ($2B-2C) is used as the starting pointer, except in the 
^ case of a tape header type 3 LOAD or a LOAD with a secondary 

^ 1 address of 1 after the device number. In either case, the data is 

stored in memory at the same location that it was saved from. SAVE 
additionally uses the BASIC pointer in location 45-46 ($2D-2E) to 
point to the end-plus-one of the BASIC program. 

When a BASIC program issues INPUT*, GET#, or PRINT*, 
BASIC puts the data into 191 -byte blocks, preceded by a tape header 
I.D. of 2. This is transparent to the user except for the periodic start- 
ing and stopping of the tape. BASIC calls the Kernal routines that in- 
put or output a byte of data (CHRIN or CHROUT) whenever it 
determines that the current block has been completed. INPUT* and 
GET* data is transferred to the BASIC buffer at 512 ($200) for 
processing. 

There are several locations you can refer to for more information 
regarding the tape buffer. They are: 

Locations 19 ($13), 158 ($9E), 159 ($9F), 160 ($A0), 166 ($A6), 
167 ($A7), 170 ($AA), 172 ($AC), 174 ($AE), 178 ($B2), 183 ($B7), 
185 ($B9), 187 ($BB), 192 ($C0), 193 ($C1), 195 ($C3), 256 ($100), 
671 ($29F), and Appendix D, which includes a device, secondary 
address, and status codes chart. 

Tape Buffer for Header Data 

When the tape file is opened, the Kernal checks that the tape buffer 
area is not located below 512 ($200) by examining the pointer at 
location 178-179 ($B2-B3). If the address in the pointer is below 
that point, an ILLEGAL DEVICE NUMBER message is displayed. 

828 $33C TPHDRID* 

(handy location) 
r-\ Tape header identifier byte (1-5). 

' ' This I.D. is the first byte of the tape header, except for I.D. 2, 

which is in the first byte of every record. This accounts for the tape 

j— [ buffer consisting of 192 bytes, even though there are only 191 bytes 

' ' of user data. 

Each I.D. byte is detailed below: 

P-, •I Relocatable: When the file is saved, if the secondary address 

' ! specified was or any even number, this I.D. is used to indicate that 

the program is to be loaded where the pointer at 43-44 ($2B-2C) in- 
dicates, unless the LOAD has a secondary address of 1 after the de- 

P vice number. RAM saved with a monitor program such as VICMON 
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will have this tape header I.D., use a secondary address of 1 to 
LOAD the data to its original location, or point 43-44 ($2B-2C) 
appropriately. See the explanation at location 829-830 ($33D-33E) M 

for how to read and modify the tape header before it's acted upon 
by the LOAD routine. 

• 2 BASIC Program Data Block: Followed by 191 bytes of data. \~[ 

• 3 Nonrelocatable: When saved with a secondary address of any ^ 
odd number, this LD. indicates that the program always loads to the 
address contained in locations 829-830 ($33D-33E). Any start-of- 

load pointer passed to the Kernal is ignored. This starting pointer is 
obtained from location 43-44 ($2B-2C) by BASIC when the SAVE 
was used. 

• 4 BASIC Program Data Header: Indicates that data written by a 
BASIC program follows in 192-byte blocks, each with an I.D. 2 as 
the first byte. 

• 5 Logical End of Tape: The Kernal will stop searching the tape 
when this header is encountered. You may, however, have addi- 
tional files beyond this point. 



829-830 $33D- 

(handy location) 
Starting address for tape LOAD. 

One technique that can be used for loading data from tape to 
any desired address is to change the pointer at 43-44 ($2B-2C) 
before issuing the LOAD of a relocatable BASIC program. See the 
append example at location 43-44 ($2B-2C). An alternate method, 
and a method of overriding I.D. 3, is to read the tape header in, 
modify it to your likiiig, and then cause the LOAD routine to use it 
to perform the function as thou^ you had entered LOAD "",1,1. ; 

First you need to call the routine FAH, which reads in the next 
tape header, by SYSing 63407. The Kernal will request that the 
PLAY button on the' recorder be pressed if necessary, and the name 
of the file found will display. The .X register now contains the tape 
header I.D., and the tape header now sits kv memory at locations 
828-1019 ($33C-3FD). You can change ttie poiftters at 829-830 - -, 

($33D-33E) and 831-832 ($33F-340) to indicate the starting and U 

ending address that you want for the LOAD. SYSing 62980 finishes 
the LOAD "",1,1, placing the data where you indicated. — 

Also see location 172-173 ($ AC-AD) for related information. [J 

831-833 $33F-340 TPHEND* 

(handy location) I ] 

Ending address, plus one, of tape LOAD. ^-^ 

See the explanation at location 829-830 ($33D-33E) for details 
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of how to read and modify the tape header before it is acted upon 
by the LOAD routine. 

See location 174-175 ($AE-AF). 



833-1019 



$341-3FD 



TPHNAME 

(handy location) 
Filename of tape data. 

Padded with blanks, these 187 bytes hold the filename that is 
specified with SAVE, OPEN, or SETNAM. 

See the discussions at locations 183 ($B7) and 187 ($BB). 

You can have tape files with ML programs saved in them. See 
the article "Saving Machine Language Programs on PET Tape Head- 
ers," by Louis F. Sander, in the July 1981 issue of COMPUTE. 

Control codes — such as switch to lowercase (CHR$(14)) — may 
be embedded in the filename and will be acted upon when the 
filename is displayed on the screen. 

The contents of this location may be assigned to a string vari- 
able in a BASIC program. This is useful when you have opened a 
tape file with OPENl,l when you don't know what the tape 
filename is. Insure that NA$="" is the first variable defined in your 
BASIC program. OPEN the file, then 

N =PEEK(45) -l-PEEK(46)*256 

This will set N to the location of the string descriptor for the variable 
NA$ in the variable pool. POKE N+2,187 to set the string descriptor 
length byte to the length of the padded-out tape filename. 

POKE N+3,65:POKE N-l-4,3 

will set the string descriptor to use the stored filename whenever 
NA$ is referred to. The filename will be overlaid when further tape 
I/O is done. NMi=NA$+"" will save this name for future use, if 
issued before further tape I/O. 

Take a look at Figure 3-1 for a moment. This illustrates a typical 
tape format for program SAVEs, not BASIC data. 



figure 3-1. Tape Fonnat 

1 2 3 4 5 6 7 8 9 10 n 12 13 14 15 16 17 



END 



> 

B C 



G H 
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Details of each section of the tape format are: ^ 

• A Ten seconds of leader dipoles 

• B Header Block #1. First nine bytes are block countdown r~j 
characters (987654321) with high order bit on. Final byte is . U 
checksum. 

• C Interblock Gap. Long bit, then 80 cycles of leader dipoles. — 

• D Header Block #2. First nine bytes are block countdown U 
characters with high order bit off. Final byte is checksum. 

• E Three seconds of leader dipoles between second block of 
header and first bldck of program. 

• F Program Block #1. First nine bytes are block countdown 
characters with high order bit on. Final byte is checksum. 

• G Interblock Gap. Long bit, then 80 cycles of leader dipoles. 

• H Program Block #2. First nine bytes are block countdown 
characters with high order bit off. Final byte is checksum. 

Tape Buffer for BASIC Program Bate 
828 $33C 

(possible user 
storage) 
Tape BASIC program data block identifier (2). 

This I.D. is the first byte of every block and accounts for the 
fact that each 192-byte tape buffer has only 191 bytes of user data. 
See location 166 ($A6) for more information. 

828-1019 $33D-$3FB TPBLOCK* 

(possible user 
storage) 
Tape block of 191 user data bytes from a BASIC program. 

This area is a block buffer for PRINT*, INPUT*, and GET*. 
Location 178 ($B2) points to this buffer, and 166 $A6 contains 
the number of characters contained in it. 



1028-1023 $3FC-3FF 

(user storage) 
Four bytes of unused area. 



u 
u 
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Built-in and 
Expansion RAM 

Ciiaracter ROM 

Location Range: 1024-4095 ($400-$FFF) 

3K Expansion RAM 

1024-4095 $400-FFF RAMBLKO* 

3072 bytes of expansion RAM area. 

A VIC-20 with 3K of expansion RAM causes BASIC to start the 
user's BASIC program at the start of this area. Location 43-44 ($2B- 
2C) point to the start of this area and contains 00/04. An unexpanded 
VIC-20 starts BASIC at location 4096 ($1000), and an 8K+ 
expanded VIC starts BASIC at location 4608 ($1200). Once an 8K 
expansion is added to the VIC-20, this area, if filled with a 3K 
expansion RAM board, is not seen by BASIC, and you may use it to 
store your own information or for ML routines. The VIC chip cannot 
see this area, so it cannot be used for screen or character memory. 
Location 55-56 ($37-38) points to the end of continuous RAM. 

Take a look at Figure 4-1, which illustrates the memory loca- 
tions with no expansion, with 3K expansion, and with more than 8K 
expansion. 

See Appendix B for details of the internal storage of BASIC and 
its programs, and Appendix E for explanations of the relocatable 
VIC-20 memory areas, user relocation of these areas, and memory 
configuration independent programming techniques. 

You can also refer to "Supercharge Your VIC," by Dan Rubis, in 
the April 1983 issue of Microcomputing for details on assembling 
your own 3K expansion. 

Location Range: 4096-9191 (SIOOO-SIFFF) 

4K Built-in RAM 

4099-9191 $1999-$1FFF USRPGM3K* 

4096 bytes of built-in RAM. 

This memory location block varies greatly with the amount of 
memory expansion RAM added to the VIC-20. We'll explore the 
alternatives as expansion RAM is added. 
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ngure 4-1. Unexpanded and Expanded RAM 

No Expansion 3K Expansion 8K+ Expansion 



0000 














($0000) 


BASIC/Kernal 
IK Work Areas 




BASIC/Kernal 
IK Work Areas 




BASIC/Kernal 
IK Work Areas 




1024 














($0400) 












3K Expansion 
RAM 




User PGM Area 
6656 RAM 




3K User Area 
for POKES, ML 




4096 














($1000) 


















Screen Area 






User PRM Area 
3584 RAM 










4608 






($1200) 


7680 
($1E00) 


Screen Area 




Screen Area 




User PGM Area 




8192 










^ 




($2000) 













u 
u 
u 
u 
□ 



The VIC chip can address this area, so it's a good candidate for 
screen and character maps, once the pointer at location 43-44 ($2B- 
2C) has been adjusted. See that location for details. Location 55-56 
($37-38) points to the end of continuous RAM. 

See Appendix B for details of the internal storage of BASIC and 
its programs, and Appendix E for explanations of the relocatable 
VIC-20 memory areas, user relocation of these areas, and memory 
configuration independent programming techniques. 
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4006-7679 



The normal variations of this 4096-byte memory area are out- 
lined in Figure 4-2. 



Figure 4-2. 4K Built-in RAM 

No Expansion 3K Expansion 8K+ Expansion 



($0400) 












4096 
($1000) 




User PGM Area 

6656 RAM 
When 3K Filled 
















User PGM Area 
3584 RAM 








Screen Area 


7680 
($1E00) 


















Screen Area 




Screen Area 




User PGM Area 


8192 
($2000) 





















4608 
($1200) 
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VIC— 20 with no expansion added 

4096-7679 $1000-1DFF U8RPGM0K'' 

3583 bytes of RAM for the BASIC program on an unexpanded 
VIC-20. 

On an unexpanded VIC-20, the BASIC program area starts here. 
Location 43-44 ($2B-2C) points to the beginning of this area. 
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7680-8191 $1E00-1FFF SCREEN* ^ 

(handy location) 
Screen map RAM on VIC-20 with less than 8K expansion. 

The screen map for both an unexpanded VIC and a VIC with 3K 
of expansion is located in this area. On a VIC with 8K or more 
expansion, the screen map RAM is located at address 4096 ($1000). 
See the description at that location for an 8K+ expanded VIC-20 for I — > 

an extensive discussion of the screen map RAM. . 

inC-20 with 3K expansion RAM added 
1024-7679 $400-lDFF 

Continuation of RAM for the BASIC program on a 3K expanded 
VIC. 

A total of 6656 BASIC program RAM bytes are available when 
this expansion RAM block has been filled. Location 43-44 ($2B-2C) 
points to the beginning of the BASIC area at location 1024 ($400). 

7680-8191 SIEOO-IFFF SCREEN* 

(handy location) 
Screen map RAM on VIC-20 with only 3K expansion. 

VIC— 20 with 8K or more of expansion RAM added 
4096-4607 $1000-11FF SCREENX* 

(handy location) 
Screen map RAM on VIC-20 with 8K or more expansion. 

Also called the video matrix, the screen map is managed by the 
Kemal screen editor using the table at 217 ($D9). 

The last six bytes of screen memory are not used for character 
indexes and you may use them for your own purposes. 

In this 512-byte area, the first 506 bytes contain indexes into the 
current character maps. Each index may be in the range of 0-255. 
Multiplying this index byte by eight and adding it to the address of 

the character map gives you the starting address of the dot-by-dot j | 

description of the character. 

The letter C is the fourth character in the ROM character maps, 
for example, so every C displayed on the screen would have 4 in the 1 I 

index byte for that position on the screen. Normally, eight bytes of ' — 

the character map are used to define the character for screen display. 
A character is displayed as eight dots high and eight dots wide, the f 1 

first byte defining the top row, the second byte defining the second * — ' 

row, and so on. This is why the index is multiplied by 8 to obtain 
the address within the character maps that the character begins on. 
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The byte can also index the first byte of an 8 by 16 character 
definition in the character maps. This is used when bitmapping the 
screen and is enabled by the value stored in location 36867 ($9003). 
In this case, only the first 253 bytes of the screen map are signifi- 
cant, each index byte being used to obtain the 8 by 16 definition of a 
double-sized character. To use this feature, you need to define a par- 
tial or full custom character set in RAM, pointed to by location 
36869 ($9005). The double-sized character feature does not cause a 
normal character to be displayed twice as large, but rather allows the 
screen map to have a unique index value for every screen position, 
which is not available when 506 bytes are used to describe the 
screen. For more information about the character and screen maps, 
see locations 36869 ($9005), 32768 ($8000), and Appendix E. 
Bitmapping the screen is discussed in Appendix G, the relocatable 
screen map is described in Appendix E, and the color map for the 
screen is explored at location 37888-38399 ($9400-$95FF). 

See location 36879 ($900F) for a background and border color 
chart and location 36878 ($900E) for the valid auxiliary colors. 

The value for the screen map index byte for any given character 
in the ROM character maps can be derived from the ASCII code that 
you wish to place on the screen. This is useful when you are 
POKEing directly to the screen rather than PRINTing. See the 
character code chart in Appendix C. 

If the high order bit of the screen POKE code is on, the reversed 
character set maps will be used for this character. If bit 6 is on, the 
symbol obtained when you also press the SHIFT key is used. For 
instance, a heart is seen on the screen for screen POKE code 19 (S), 
when 64 (bit 6) is added to it. However, if the alternate character set 
was selected, a capital S would appear. The s)mibol printed on the 
left-hand side of the key is displayed by pressing the key and the 
Commodore key simultaneously. This has its own screen code. 

You can convert a character's ASCII value to its screen POKE 
code (P) by using the routine below in your own program. 

Piogram 4-1. ASCD to Screen Code Conversion 

10 C = ASC(X$) : REM ASCII VALUE OF FIRST CHARACTER 
20 P = C : IF C > 127 AND C < 159 THEN P=0 : GOTO 

{SPACE} 100 
30 IF C < 64 THEN 100 
40 P = C-32 

50 IF C < 96 THEN P = P-32 : GOTO 100 
60 IF C < 128 THEN 100 
70 P = P-32 

80 IF C > 191 THEN P = P-64 
90 IF C = 255 THEN P = 30 
100 :::::::: 

111 



8K+ 4096-4607 



5 FOR 1=32 TO 255:X$=CHR$ (I ) :PRINT X$, 
100 PRINT P:NEXT 
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In order to see the values displayed on the screen, all you need I I 

to do is add two lines: 



u 



Hold down the CTRL key to slow down the values as they _ 

scroll up the screen. j j 

Character codes 128-159 have no POKE codes. 

Routine SCRNOUT* may be examined for the techniques used, 
or you may JSR to it directly after you have positioned the cursor. 
See locations 780 ($30C) and 217 ($D9). Screen POKE codes (P) can 
be converted to ASCII (A) in a larger program by the following rou- 
tine, with R being set to one if the screen POKE code was a reverse 
character: 

Program 4-2. Scraen Code to ASCII Conversion 

50 P = PEEK(206) : R = 

60 IF P > 127 THEN R = 1 : P = P AND 127 

70 IF P < 32 OR P > 95 THEN A = P + 64 : GOTO 100 

80 IF P > 31 AND P < 64 THEN A = P : GOTO 100 

90 A = P + 32 

100 RETURN 

If you want to see the values on the screen without running a 
program of your own, simply insert these line in the routine above: 

40 INPUT A$ 

50 P=PEEK ( 207 ):R=0: PRINT P 

100 PRINT As 

110 GOTO 40 

See Appendix C for a character code chart. 

The screen on the VlC-20 is composed of 23 lines of 22 
columns. If you know where you want to be on the screen, there are 
several ways to determine the screen map byte to put the POKE 
code in. 

By using the formulas given, you can compute within a program ; 

the address of the particular byte on the screen map. You may also \ I 

make these computations external to the program and store the 
values in DATA statements or variables to be used later. The latter 
technique is speedier but requires knowing in advance the positions l_J 

required. Most likely you'll find a combination useful. Using these 
variables, you can calculate a byte's screen address: 

SM= screen memory address j \ 

CM = color map address 

SL=the desired line, expressed as 0-22 
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SC=the desired column, expressed as 0-21 
CH=the character in screen POKE code 
CL=the desired color code (0-7) 

X = SL * 22 + SC : REM calculate displacement in maps 
POKE SM + X, CH : REM place character on screen 
POKE CM + X, CL : REM place color code in color map 

You can then add or subtract one to move one position right or 
left, and add or subtract 22 to move one position up or down. 
Remember to test for the edges of the screen. 

For turning a dot on or off on a high-resolution bitmapped 
screen with double-sized characters, you just need to alter the RAM 
custom character set byte that the dot is in. If BM is the address of 
the start of your custom character set, CM is the address of the start 
of the color map, X is the desired dot column minus one, and Y is 
the dot line minus one, then: 

REM : find the 8 x 16 character within the character map 

CR = INT ( X / 8 ) + ( INT ( Y / 16 ) * 22 ) 

REM : find the 8 wide row within the 8 x 16 character 

RW = ( Y / 16 - INT ( Y / 16 ) ) * 16 

REM : find the byte number of the row in the character map 

BY = BM -I- ( 16 * CR ) -I- RW 

REM : find the bit number within the byte 

BT = 7 - ( X - ( INT ( X / 8 ) * 8 ) ) 

REM : him on the bit 

POKE BY, PEEK ( BY ) OR ( 2 t BT ) 

REM : turn the bit yellow 

POKE CM -I- CR, 7 

REM: turn off the bit 

POKE BY, PEEK ( BY ) AND ( 255 - ( 2 t BT ) ) 

You can also use the PLOT routine in the Kemal to position the 
cursor to a given line/column. Pointers to the screen RAM and color 
RAM byte will be set by this routine for your use. Locations 217 
($D9) and 780 ($30C) have examples of using this and related 
routines. You'll find this the fastest method of determining a screen 
map position. In general, always try to use the provided, built-in ML 
subroutines in BASIC and the Kernal, since they are fast, debugged, 
and cost you very little previous RAM compared to programming the 
routine in BASIC. 

See location 32768 ($8000) for the provided character maps. For 
information about creating your own character set maps, see Appen- 
dices E and G, and location 36869 ($9005). 

See location 32768 ($8000) for a program to display or print any 
number of 8 x 8 character bytes in a large graphic matrix. This pro- 
gram will also note the decimal numbers used to define each pixel in 
each row. 
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The relocatable screen map is discussed in Appendix E. Appen- 
dix G describes bitmapping the screen, and location 36869 ($9005) 
describes changing the location of the screen map and using multiple j | 

screen and color maps. 

Once a character map index is placed in the screen map, one 

more piece of information is needed to display the character on the \ i 

screen — see the color map description starting at location 37888 '— ' 

($9400). The relocatable color map is explained in Appendix E, and 
the use of the color map for the screen is explored at location 
37888-38399 ($9400-$95FF). 

See location 36879 ($900F) for a chart of background and border 
colors and 36878 ($900E) for the valid auxiliary colors. 

4608-8191 $I200-IFFF USRPGM8K* 

First 3583 bytes of BASIC area on an 8K plus expanded VIC-20. 

An 8K expanded VIC-20 starts BASIC at 4608 ($1200) and 
extends it to the end of expansion RAM, which can be as high as 
32767 ($7FFF). Location 55 ($37) points to the end of expansion 
RAM. 

If a 3K expansion is also present, BASIC will ignore it, so it's 
available for your own use. The VIC chip cannot address it, how- 
ever, so screen or character maps cannot be placed there except as 
temporary SAVE areas invisible to the VIC chip. 

Location Range: 8192-16383 ($2000-$3FFF) 

8K Expansion Block 1 

8192-16383 $2000-$3FFF RAMBLKl* 

8K RAM expansion block 1. 

When this area is filled by RAM, BASIC starts at location 4608 
($1200) and any 3K expansion is ignored by BASIC. The total avail- 
able user program space is 11,776 bytes. This area could also be 
filled with ROM, although I don't know of any cartridges now avail- 
able that use this area. 

The DIP switch on the Commodore 8K memory expansion ( i 

board should be set so that switch 4 is on to fill this area. The other ' — 

three switches should be in the off position. 

A description of how to build your own 16K and 3K memory r i 
expansion boards can be found in Tricks for VICs. I i 

Location Range: 16384-24S7S ($4000-$5FFF) U 

SK RAM expansion block 2. 
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I6384-2457S $4000-$5FFF RAMBLK2* 

PI 8K RAM expansion block 2. 

' ' When this area is filled by RAM and the previous block is filled 

with RAM, BASIC still starts at 4608 ($1200) and any 3K expansion 
is ignored by BASIC. Total available user program space is 19,967 
bytes. If the previous RAM expansion block is left empty, this block 
is ignored by BASIC since it stops looking for RAM as soon as it 
encounters an unfilled block. This can be useful when you wish to 
hide large amounts of memory from BASIC. As with block 1, this 
area could be filled with ROM instead of RAM. 

Turn the Commodore 8K expansion board's DIP switch 3 on for 
this block. 

Location Range: 24S76-32767 ($6000-$7FFF) 

8K Expansion Block 3 

24576-32767 $6600-$7FFF RAMBLK3* 

8K RAM expansion block 3. 

When this area and the previous two 8K blocks are filled by 
RAM, BASIC still starts at 4608 ($1200), and any 3K expansion is 
ignored by BASIC. 28,160 bytes are then available for user program 
space. If either of the two previous expansion blocks is empty, 
BASIC ignores this block, since it stops looking for RAM as soon as 
it encounters an unfilled memory block. You could use this to hide 
8K blocks from BASIC. Cartridges frequently fill this area with ROM 
instead of RAM. Programmer's Aid, word processors, games, and 
some VICMONs may use this block. Autostart is not done for this 
block. Remember that only 40960 ($A000) resident cartridges 
autostart. Some cartridges reside at 40960 ($A000) and use this block 
also. 

The Commodore 8K and 16K expansion boards should both 
have DIP switch 2 set on for this block. 

Note. The Kernal prevents saving to locations above 32767 
($7FFF) to tape. However, disk is not restricted. See location 172 
($AC) for how the Kernal restricts tape saves to locations below 
32768 ($8000) 

Location Range: 32768-36863 ($8a6e-$8FFF) 

4K ROM Character Maps 

The following character pixel (picture element) maps in ROM 
are the built-in character set definitions used to form characters on 
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the screen. This is done by pointing via an index to the appropriate 
character definition. Each character is defined by an eight-by-eight 
bit grid, sometimes called a character cell. For example, locations 
32776-32783 ($8008-800F) define the pixel modes for the capital A 
character: 
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ngurc 4-3. The A CharaGter Defininon 

Pixel Appearance Location Binary Image Dec Hex 




32776 


($8008) 


00011000 


24 


$18 


32777 


($8009) 


00100100 


36 


$24 


32778 


($800A) 


01000010 


66 


$42 


32779 


($8006) 


01111110 


126 


$7E 


32780 


($8000 


01000010 


66 


$42 


32781 


($800D) 


01000010 


66 


$42 


32782 


($800E) 


01000010 


66 


$42 


32783 


($800F) 


00000000 





$00 



128 64 32 16 8 4 2 1 



The DATA statement for this character, if you were using it in a 
custom character set, would be: 

DATA 24,36,66,126,66,66,66,0:REM capital A 

Character A is composed of eight bytes, one byte for each row. 
Each bit in each row represents a pixel and is set to one if the pixel 
is on. The on pixel image on the left side of Figure 4-3 is formed by 
the binary definitions on the right. Wherever a capital A is to appear 
on the screen map, the index of 1 is placed in the screen map RAM. 
2 is the index for capital B, 3 for capital C and so on. is the index 
for the character @. By adding the index multipied by eight to the 
address of the start of the character pixel map, the definition for that 
particular character can be found. Location 36869 ($9005) contains a 
pointer to the current character pixel maps. The index values stored 
in the screen map RAM are not the ASCII value for a character. 
They are referred to as screen POKE codes, and you'll find a chart of 
them in Appendix C. The ASCII code for a character can be con- 
verted to the screen POKE code and vice versa using the routines 
given at location 4096 ($1000). 
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32768-36863 



When using the PRINT statement in BASIC, this conversion is 
done by the Kernal SCRNOUT* routine. For any device other than 
the screen, the ASCII type character code is used. 

There are two separate and nonmixable character sets on the 
VIC-20: uppercase/graphics and lowercase/uppercase. Both sets are 
comprised of 256 characters, half of which are the reverse images of 
the characters. Two sets of 256 characters with 8 bytes used to map 
each character requires 4K (4096 bytes) of character pixel map ROM. 

The keyboard can be used to determine which character pb<el 
map is used. Press the Commodore key and the SHIFT key to switch 
between the two character sets and CTRL/RVSON or CTRL/ 
RVSOFF as desired. > 

A program can PRINT the CTRL/RVSON or CTRL/RVSOFF, as 
well as PRINT CHR$(14) for lowercase, and PRINT CHR$(142) for 
uppercase. Using this, you can select the correct character set under 
program control. By using POKE 657,128 you can disable the SHIFT 
and Commodore key combination from switching to the alternate 
character set. The SHIFT, Commodore, and CTRL keys when 
pressed for any other purpose will operate normally. To reenable the 
SHIFT/Commodore combination, POKE 657,0. You can also achieve 
the same effect by PRINT CHR$(8) to disable character set switching 
and PRINT CHR$(9) to enable it. 

The following program will display or print any number of 
eight-by-eight byte character map pixel description bytes. The pro- 
gram vdll diagram the pixels onto a large graphic matrix along with 
the associated decimal numbers that were used to define each pixel 
in each row. To cause the output to be printed rather than displayed, 
change OPEN 4,3 on line 10 to OPEN 4,4. Line 20 may be changed 
from 32768 to any other desired starting point. If left as is, the entire 
128 uppercase nonreversed map will be diagrammed. To start the 
diagram program at a specific letter, multiply the screen POKE code 
of the first character by eight and add that to the character pixel map 
starting address. To diagram 12 letters starting with F, you would 
change line 20 to: 

FOR BEGIN = 32768 -I- ( 8 * 6 ) TO 32768 + ( 8 * 18 ) STEP 8 
because 6 is the POKE code for F, and 18 is the sum of 6 and 12. 

Prognm 4-3. Character Diagrams and Bit Values 

10 OPEN 4,3 :REM CHANGE 4,3 TO 4,4 FOR PRINTER OUT 

PUT 
20 FOR BEGIN = 32768 TO 32768 + ( 8 * 128 ) STEP 8 
30 PRINT#4, "PIXEL MAP OF CHARACTER" 
40 PRINT#4, "STARTING AT"BEGIN 
50 PRINT#4, "76543210 DECIMAL" 
60 FOR X = TO 7 : Z = PEEK(BEGIN+X) : FOR Y = 7 

{SPACE} TO STEP -1 
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32768-33791 



70 


VJ = Z AND (2ty) : IP W THEN PRINT#4* 




{OFF}"; : GOTO 90 


80 


PRINT#4,"."; 


90 


NEXT Y : PRINT #4, "{3 SPACES }"Z : NEX 




#4 : NEXT :END 



'{RVS} 



PRINT 



Character Set 2 Text Set 

34816-35839 $8800-88FF CASEL* 

Lowercase and uppercase nonreversed screen character map. 

This section of 1024 bytes describes the 128 lowercase and 
uppercase character set when both the RVSOFF and the SHIFT/ 
Commodore key combination are in effect. This character set is 
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Character Set I Graphic Set 

32768-33791 $89GG-83FF CASED* 

Uppercase and graphics nonreversed screen character map. 

This area consists of 1024 bytes describing the 128 uppercase 
and graphics character set when RVSOFF is selected and no SHIFT/ 
Commodore key combination is in effect. 

This is the default character map, used when you turn the com- 
puter on. The first eight-byte pixel map corresponds to screen POKE 
code 0, the @ character, the second to the capital letter A, and so 
on. See Appendix C for a character chart in which the 128 character 
pixel maps in this area correspond to screen POKE codes through 
128. See the discussion at the beginning of this section for details of 
how to select this character map from a user program. 

33792-34815 $840G-87FF CASEURV* 

Reversed uppercase and graphics screen character map. 

This area contains 1024 bytes describing the 128 reversed 
uppercase and graphic character set when RVSON is selected and no 
SHIFT/Commodore key combination is in effect. The pixel maps are 
in the same order as the character pixel maps at 32768 ($8000,) but 
each bit is reversed to display the character in a dark on light back- 
ground pattern. 

You can use this character set for individual characters by ORing 
the high order bit of the screen POKE code for those screen indexes 
that you wish displayed in reverse. If SP were the screen map 
position you wished to reverse, POKE SP,10R128 would cause that 
one position to be a reverse capital A. The same effect is accom- 
plished by adding 128 to the screen POKE code. See Appendix C for | ) 

a code chart of the screen codes. 
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mutually exclusive with the first set, in that characters from the two 
character sets cannot be on the screen at the same time. An excep- 
tion is with the raster interrupts, which are discussed at location 
36868 ($9004). However, this set does include all the capital letters, 
numbers, punctuation, and a few of the graphic symbols from the 
first character set maps. Four additional graphic symbols are 
included, one of them a check mark. The lowercase characters 
(lowercase g, j, p, q, y) do not employ descenders (the part of the 
letter that extends below the bottom of other characters). 

35840-36863 $8C00-8FFF GASELRV* 

Reversed lowercase and uppercase screen character map. 

These 1024 bytes describe the 128 reversed lowercase and 
uppercase character set when the RVSON and SHIFT/Commodore 
key combination are in effect. The pixel maps are in the same order 
as the character pixel maps at 34816 ($8800), but each bit is 
reversed. (Previously on bits are instead set to 0, or off.) 

You can use this character set for individual characters by ORing 
the high order bit of the screen POKE code for those screen indexes 
that you wish shown in reverse. You can also SHIFT the letter to 
uppercase by ORing the sixth bit. IF SP is the screen map position 
you wanted to reverse and SHIFT, POKE SP,10R192 would cause 
that one screen position to be a reverse capital A. The same effect is 
accomplished by adding 192 to the screen code, as in POKE 
SP,1 + 192. See Appendix C for a code chart of the screen POKE 
codes, and the subject index for uppercase, lowercase, SHIFT, Com- 
modore, RVSON, and RVSOFF. 
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Video Interface 



Chip 



Location Range: 36864-37135 ($90D6-$910F) 

6560 Video Interface Chip 

The 6560 Video Interface Chip, also known as the VIC chip, 
provides the color, sound, character pixel screen mapping, and paddle/ 
light pen support for the VIC-20. 

Jim Butterfield has thoroughly explored the inner workings of 
the VIC chip in his series of articles entitled "Visiting the VIC-20 
Video," which began with the May 1983 issue of COMPUTE!. Of 
course, the V'IC-20 Programmer's Reference Guide can serve as an 
excellent resource as you explore the VIC chip. For a more general 
exploration of the VIC chip, see The VIC-20 User Guide (not to be 
confused with the manual that comes with your VIC computer). 
MOS Technology publishes specification sheets for the VIC chip, and 
the schematic diagram in the back of the VIC-20 Programmer's Ref- 
erence Guide is very useful for understanding the chip. 

The VIC-20 output video signal can even be videotaped on a 
home Video Cassette Recorder (VCR) since NTSC standards are fol- 
lowed in the VIC-20. 

The VIC chip also provides the 6502 and 6522 chips with a sys- 
tem clock of 1.1082 megahertz. This is derived from the 14.31818 
megahertz crystal in the VIC-20. 

The 6560 VIC Chip Registers 

The 6560 VIC chip registers are actually located in the VIC chip 
itself. There is no RAM that corresponds to these registers. When 
POKEing or PEEKing these locations, you are actually looking inside 
r-) the VIC chip itself. 

i i. Pressing the RUN/STOP-RESTORE keys causes these values to 

be reinitialized by the INITVIC* routine from the table at VICINIT*. 
You'll be looking closely at various bits in each register byte, so 
ri for quick reference, look at Table 5-1. Bit positions and values are 

outlined in this table. 
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Table S-1. Bit Posittons and Values 

BIT 7 6 5 4 3 2 1 

DEC 128 64 32 16 8 4 2 1 

HEX $80 $40 $20 $10 $08 $04 $02 $01 _ 

u 

36864 $8666 VIGCR6* 

(handy location) 
Left edge of TV picture and interlace switch. 

Bit 7: Interlace scan bit. Default value: 0. 

When set to 1, this bit causes every other full sweep of the TV 
to be skipped. 

A TV picture is formed by 60 screen scans every second. The 
screen is painted, then painted again in between the first set of lines. 
Each half of these lines is painted 30 times a second, producing 30 
complete frames per second. There are 525 lines in the full TV pic- 
ture, 262.5 lines per painting. At 30 frames per second, this means 
that 15,750 lines are painted every second. Setting this bit on (1) 
causes one of those halves to not paint the VIC-20 picture image. 
Flicker results unless another multiplexed input to the TV is used to 
create the composite pictures. This overlay effect requires special 
equipment. 

Some TV sets may require turning this bit on to stop picture jit- 
ters. Many commercial programs for the VIC-20 provide you with a 
command to turn this bit on, in case your TV set shows these jitters. 

To turn this bit on: 

POKE 36864,PEEK(36864)OR 128 
To turn bit off: 

POKE 36864,PEEK(36864)AND 127 

Bits 6-0: Horizontal TV picture origin. Default value: 5. 

These bits can be used to adjust the position where the first 
character appears on the left side of the TV picture. Possible values , , 

in this location are between and 127 (although those above 16 LJ 

seem to confuse BASIC), with larger numbers moving the characters 
to the right. Every increase or decrease of this number by one shifts 
the TV display four pixels right or left. If this location is set to 0, col- ) I 

umn 3 would be on the extreme left edge of the TV picture. As the 
picture shifts on the TV, the border expands and contracts. Most of 
the more recent software packages for the VIC-20 allow the user to ) 

adjust this value for optimum centering of the picture on the TV, 
usually through cursor keys or joystick action. 
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To change these bits, you can POKE 36864,PEEK(36864)AND 
128 OR XXX, where XXX is any value between and 127. Values 
above 16, remember, seem to confuse BASIC. 

Here's a sample routine to adjust bit 7 and center the TV picture 
using the cursor keys. Type it in and run it to see this register's 
effect on the TV picture. 

Propam S-l. Centering the Picture 

100 : : : REM USE CURSOR KEYS TO CENTER SCREEN 
110 : : : REM USE UP ARROW KEY TO TOGGLE INTERLACE 
120 : : : REM USE EQUAL SIGN KEY TO RESTORE DEFAULT 

{SPACE} VALUES 
130 BASE=36864 

140 GET A$:IF A$="" THEN 140 
150 A=ASC(A$) 
160 IF A$="=" THEN P0KE36864,5 : POKE36865,25 : GO 

TO 140 
170 IF A=13 THEN 330 
180 IF A<>29 AND A0157 GOTO 250 

190 H=PEEK(BASE) AND 127 : I=PEEK(BASE) AND .128 
200 IF H>16 THEN H=I6 
2.10 IF H<2 THEN H=2 

220 IF A=29 THEN POKEBASE,I OR (H+.l) : GOTO 140 
230 POKEBASE,I OR (H-1) 
240 GOTO 140 
250 IF A=94 AND PEEK( BASE )> 127 THEN POKE ( BASE ), PEE 

K( BASE) -128 : GOTO 140 
260 IF A=94 THEN POKE ( BASE ), PEEK (BASE) +128 : GOTO 

{SPACE} 140 
270 IF AOI7 AND A0145 GOTO 140 
280 V=PEEK(BASE+1) 

290 IF A=17 THEN V=V+.l : IF V>136 THEN V=136 
300 IF A=17 THEN P0KEBASE+1,V : GOTO 140 
310 V=V-1 : IF V<0 THEN V=0 
320 P0KEBASE+1,V : GOTO 140 
330 END 



$9001 



(handy location) 



Bits 7-0: Vertical TV picture origin. 

This location specifies where the top line of characters is dis- 
played on the TV. The picture can be relocated by the addition or 
subtraction of one from this location; subtraction raises the picture 
on the screen, and addition lowers it. Each change of one in this 
value moves the TV display two pixels. A value of zero here causes 
the middle of the fourth line to be at the top of the TV. 
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See location 36864 for a sample routine to adjust the picture ' — ' 
centering with the cursor keys. 

By entering the following, you can make the TV display a screen ; , 

completely in the border color: I — I 

POKE 36865,255 

You could use this to hide the screen while you formatted it, for .— , 

example. I — I 

The article "VIC Memory — The Uncharted Adventure," by 
David Barron and Michael Kleinert, in COMPUTEI's First Book of VIC, 
is a useful reference. Simply subtract 16 from the locations listed 
over 36880 and you're back to the VIC chips which perform the 
functions the authors have noted. 

A sample program in this article demonstrates the use of this 
location to implement smooth scrolling from the bottom of the 
screen upwards. 

To set this byte, just POKE the desired value without adding 
any ANDs or ORs. 

You can try this technique of scrolling the screen by entering the 
following program. 

Program S-2. Screen ScroUiiig 

10 REM **** SCREEN SCROLLING DEMO *** 36865 

70 POKE36879,0+8 

71 C$="{WHT}{RED}{CYN}{PUR}{GRN}{BLU}{YEL}" 
80 FORZ=lT07:Cl$=MID$(C$,Z,l):POKE36865,132 

100 PRINTC1$"{CLR}*THIS IS A DEMO OF A{2 SPACES}SC 

ROLLING EFFECT USING LOCATION 36865.*" 
105 PRINT"{RVS}{22 SHIFT-SPACE}" 
110 PRINT"CHANGE THE VALUE AT{3 SPACES}THE END OF 

{ SPACE }THE 'Y' FORLOOP IN LINE 120 TO" 
115 PRINT"CONTROL SCROLL SPEED" 
120 FORX=131TO24STEP-1:POKE36865,X:FORY=1TO80:NEXT 

: NEXT : NEXT : GOTO80 

36866 $9662 VIGCR2* 1S6 

(handy location) ^ f 

Number of columns displayed, part of screen map address. 

Bit 7: Default value: 1. This bit serves as bit 9 of the 14-bit screen — 

map address used by the VIC chip. | [ 

If this bit is set to 0, the screen map RAM is located on a 1024- 

byte boundary, and the color map begins at location 37888 ($9400). 

When this bit is set to 1, the screen map RAM starts on a 512-byte \ j 

boundary and the color map is at location 38400 ($9600). See loca- 
tion 36869 ($9005) and also Appendix E for screen relocation and 
multiple screens/color maps details. 
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' The Kernal routine INITSK* sets this bit on at power-on/reset 

and RUN/STOP-RESTORE if the screen map should be located on a 
f—f, 512-byte boundary. 

Bits 6-0: Default value: 22. These bits contain the number of charac- 
ter columns displayed on each TV display line. This value can range 
J~| from to 25. Although some stunning graphics can be created by 

raising this value and eliminating the border, the Kernal doesn't 
really want anything to do with a lengthened screen line. So avoid 
PRINT, cursor movement, and the screen editor if you set this value 
to anything other than 22. You'll have to use screen POKE codes, 
develop your own formula for X/Y plotting, arrange for a larger 
screen map in RAM, and adjust the color map accordingly. 

There's also the problem of having only 256 indexes in the 
screen map RAM. So when working in high resolution, there will 
have to be some duplicate characters on the screen, but the screen 
design can usually accommodate this. The amount of the line visible 
on the TV screen can vary among makes and models, so experiment 
with your TV set. Once you've seen a full-screen display, you'll 
probably want to explore this further. Despite the amount of work 
involved, it's worth the effort. 

Lowering this value may prove handy to you. Twenty-two TV 
columns seem narrow enough, but maybe an idea will occur to you. 

To set this value: POKE 36866,(PEEK(36866) AND 128) OR XXX 
where XXX is a value from to 25. 

36867 $9003 VIGGR3* 174 or 46 

(handy location) 
Number of character lines displayed, part of raster location. 

Bit 7: Default value: 1/0. Raster beam location bit 0. Combine this, 
as the low order bit, with location 36868 ($9004). See that location 
for more information. 

Bits 6-1: Default value: 46. Number of character lines displayed on 
the TV picture multiplied by two. By varjdng this value, you can 
make the border expand or shrink and use fewer or more TV lines. 
The same considerations apply for these bits as for location 36866 
($9002) bits 6-0, so see that location for details. The value in this 
position is multiplied by two because the low order bit of this byte is 
used for other purposes. Thirty to thirty-two seems to be about the 
maximum useful number of screen lines. 

To set these bits you can POKE 36867,(PEEK(36867)AND 129) 
OR (XXX*2), where XXX is the number of lines desired. 

Bit 0: Default value: 0. Character size 8 x 8, or 8 x 16 pixels 

When bitmapping the screen or doing other custom character set 
r-i tasks, this bit can be set to specify the double-sized character option 
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(8 pixels wide by 16 high). The bottom of the border will drop off 1—1 

the TV, and you'll see only eleven and a half double-sized character 

lines (unless you also adjust the vertical TV picture origin in 36865, r , 

$9001). A zero in this bit position specifies 8x8 character size, while | 1 

a one selects 8 x 16 characters. When double-sized characters are 

used, only the first half of the screen map is significant, each POKE . 

code being used to obtain the 8x16 definition of a double-sized j_J 

(twice as high — 16 — rather than 8 dots high) character to display. 

To use this feature, you need to define a partial or full custom 
character set in RAM, pointed to by location 36869 ($9005). The 
double-sized character feature does not cause a normal character to 
be displayed twice as large. Rather, it allows the screen map to have 
a unique index value for every screen position, which is not avail- 
able when 506 bytes, with a range of 0-255 in each, are used to 
describe the screen. 

To set this value: 

POKE 36867,PEEK(36867) OR 1 

For more information about custom character sets, see locations 
36869 ($9005), 32768 ($8000), and Appendix E. Bitmapping the 
screen and relocating the screen map are described in Appendix G. 

36868 $9604 VIGCR4* 

(handy location) 
Raster beam location bits 8-1. 

Bits 7-0: When combined with the high order bit of location 36867 
($9003) as the low order bit, this value tracks the location of the 
electron beam as it refreshes the TV picture. If you were to use only 
this location to reference the raster location, you would only sense 
every other TV line. This raster location is used by the light pen 
sensing function of the VIC chip, and is latched into locations 36870 
($9006) and 36871 ($9007). 

This location contains the line number that the raster beam is 
currently scanning. In an ML routine, you can test the location of the 
raster at any time and execute a command when a certain point is 
reached. You could switch color schemes, character map, or some r l 
other effect. A public domain program called "Colortrick2" by Joe LI 
Watson creates a rainbow border using this technique. You need to 
be able to constantly intercept the refresh of the screen, demanding — 
an ML loop with severe timing restrictions. Experimentation is the j_J 
key. The TV picture could be segmented with different color back- 
grounds displaying var3dng t)^es of information. The possibilities 

are quite varied for using this location for TV picture customization. M 
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(handy location) 
Screen map and character map addresses. 

Bits 7-4: Default value: 240. These bits serve as bits 13-10 of the 
screen map address, combined with bit 7 of 36866 ($9002) to form 
the 14-bit VIC chip screen map address. 

Let's put together the 14-bit address as seen by the VIC chip, 
using the 240 ($F0) default value in this location and the default 1 in 
the high order bit of VICCR2*: 

ngura 8-1. 14-Blt Address 

VICCR5* bits 76 54 

Uil 

14-bit address= 01 1110 0000 0000 = $1E00 = 7680 

t 
VICCR2* bit 7 



Notice that 7680 is the default unexpanded VIC-20 screen map 
location. 

Also note that the high order bit of VICCR5* was changed to 
zero when it was put into the high order bit of the 14-bit address. 
This is the other aspect of the screen map address that confuses 
many programmers. Bit 7 of VICCR5* must always be one, but is 
viewed as though it is zero. I won't even try to rationalize this; it's 
just the way it works. 

Remember that bit 7 of VICCR2* determines the color map 
address (37888 or 38400) and, as you can now see, indicates 
whether the screen map is on a 1024-byte or 512-byte boundary. 

You can use the following formula to find the screen map: 

SM=4*(PEEK(36866) AND 128)+64*(PEEK(36869) AND 112) 
You can also use SM=PEEK(648)*256. 

Screen Map Available Locations 

(Any IK or 512-byte boundary must be selected in unexpanded 
RAM, but the following locations are the unused areas.) 
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^ble S-2. Screen Map Locations 



Screen 


Location Color 


36869 


36866 


POKE Values 


Decimal Hex 


Map 


Bits 7-4 


Bit 7 


(see notes below) 


— 







— 




-X- 


-Y- 


mm 


$10001 


37888 


llOCt 





192^ 





4608 


$1200 


38400 


1100. 


1 


192 


128 


:§me 


i$140r 


3788r 


ilfli: 





208 





5632 


$1600 


38400 


1101 


1 


208 


128 


6144 


$1800 


37888 


1110 





22* 


' 


6656 


$1A00 


38400 


1110 


1 


224 


128 


;716t 


$1C00 


37888 


nil 





240 





7680 


$1E00 


38400 


nil 


1 


240 


128 



You'll note that, unfortunately, no expansion RAM locations can 
be used for this map. 

To set the screen address to any of the valid addresses listed 
above, the value in the first POKE value column replaces X in the 
statement: POKE 36869,(PEEK(36869) AND 15) OR X. The second 
POKE value number replaces Y in the statement POKE 
36866,(PEEK(36866) AND 127) OR Y. Finally, POKE 648,Screen 
Address/256:CLR. 

The second POKE (using the Y value) specifies whether the map 
address starts on a IK or 512-byte boundary. 

For example, to set 7680 as the screen address you would enter: 

POKE 36869,(PEEK(36869) AND 15) OR 240 
POKE 36866,(PEEK(36866) AND 127) OR 128 
POKE 648,7680/256:CLR 

An alternate method is to POKE 648,Screen Address/256:SYS 
58648. 

Jim Butterfield has demonstrated setting this location to binary 
1000 (by using 128 as an X value above) and turning off the high 
order bit of location 36866 ($9002) (by using as a Y value above), to 
temporarily set the screen map at location zero so that you can 
observe the symbolic activity in the first two pages of memory. 

On an unexpanded or 3K expanded VIC-20, the screen address 
default is 7680 ($1E00), while on an 8K plus expanded VIC-20 the 
screen address is set to 4096 ($1000). 

Although only one screen map may be displayed at any given 
moment, you may have more than one area for a screen map, with 
its own color map dedicated to it. If SM is the screen map address 
that you want displayed, you need to: 
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• Change the address bits here 

• Change the page number in location 648 

• Alter locations 217-228 ($D9-E4) to SM/256+128 

• Change locations 229-240 ($E5-F0) to SM/256+129 

• And set bit 7 in location 36866 ($9002) for the screen to be 
currently displayed 

The screen won't flip until a carriage return is sent to it. You 
may want to save the screen line link table 217-240 ($D9-F0) bytes 
somewhere rather than resetting them to unlinked lines. Be sure to 
pick an alternate screen address that uses the other color map. The 
easiest combination is two screen addresses, with this location hav- 
ing the same bits 7-4 and bit 7 of 36866 ($9002) reversed. Examples 
of these combinations would be 4096 and 4608; 5120 and 5632; 
6144 and 6656; or 7168 and 7680. Then this location won't need to 
be altered. 

For example: 

SM=4096 : REM select screen one 

POKE 36866,(PEEK(36866) AND 127) 

POKE 648,SM/256 

FOR X=217 TO 228:POKE X,PEEK(648)+128:NEXT 

FOR X=229 TO 240:POKE X,PEEK(648)-I-129:NEXT 

PRINT"home": REM screen one selected 

SM=4608 : REM select screen two 

POKE 36866,(PEEK(36866) AND 255) 

POKE 648,SM/256 

FOR X=217 TO 228:POKE X,PEEK(648)-I-128:NEXT 

FOR X=229 TO 240:POKE X,PEEK(648)-I- 129:NEXT 

PRINT"home": REM screen two selected 

Related screen fields are: 209 ($D1), 217 ($D9), 243 ($F3), 648 
($288), 4096 ($1000), 7680 ($1E00), and 32768 ($8000). Also see 
screen and screen map in the subject index. 

Bits 3-0: Default value: 0. These serve as bits 13-10 of the character 
map 14-bit address. They are used to form the 14-bit VIC chip 
address that points to the beginning of the current 2048-byte (2K) 
character map or custom character set. 

The Kemal routine SETKEYS* changes this value when the 
Commodore key and SHIFT are pressed together, to make sure the 
proper character map is used. 

Take a look at Figure 5-2 for a moment to see the details of the 
14-bit address that the VIC chip uses. 
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ngure S-2. 14— Bit Address, Character Map 

VICCR5* bits 32 10 

WW 

14-bit address = 00 0000 0000 0000 = $0000 = 32768 

The default unexpanded VIC-20 character map location begins 
at 32768, the value obtained in Figure 5-2. 

You probably suspect by now that there's some special rule that 
applies to this situation, since obviously the character map doesn't 
begin at address zero, and because $0000 is hardly the same as 
32768. Because of the way the VIC chip sees the memory in the 
VIC-20, zero here means 32768 ($8000) to the VIC chip. If the 
peculiar vision of the VIC chip interests you, you'll want to read Jim 
Butterfield's series of articles entitled "Visiting the VIC-20 Video," 
which started in the May 1983 issue of COMPUTE! magazine. How 
this all works is interesting, but you need to know how to use this 
location. A few facts will help: 

• The first two bits (bits 3 and 2) of these four bits specify the 
address of the start of the character map in 4096-byte increments. 

• The second two bits (bits 1 and 0) contain the number of 
times that 1024 ($400) must be added to the value in bits 3 and 2. 

• If bits 3 and 2 are both zero, 32768 ($8000) is used, plus the 
settings in bits 1 and 0. 

• The character map must start on a 1024-byte boundary. You 
can see that there's no way to specify an amount smaller than IK. 

Here's a table of the possible combinations for the character map. 

Table S-3. Character Map Locations 



Bits 


Decimal 


Hex 


Decimal 


Hex 




321Q 


Value 


Value 


Address 


Address 


Type of characters 


OQ0f 








327^68 


$8000 


Uippejcase 


om 


1 


1 


33792 


$8400 


uppercase reversed 


0010 


2 


2 


34816 


$8800 


lowercase 


oiii 


.3 : 


3 


35840 


$8€00 


lowerease reversed 


OlOt) 


4 


4 


36864 


$9000 


don't use — VIC chip 


0101 


5 


5 


37888 


$9400 


don't use — color map 


Olio 


6 


6 


38912 


$9800 


don't use — I/O block 


0111 


7 


7 


39936 


$9C00 


don't use — I/O block 


1000 


8 


8 


0000 


$0000 


don't use — low RAM 


1001 


9 


9 


1024 


$400 


can't be accessed 


1010 


10 


A 


2048 


$800 


can't be accessed 


1011 


11 


B 


3072 


$C00 


can't be accessed 


IMO 


12 


C 


4096 


$1000 


custom character set 


liii 


13 


D 


5120 


$1400 


custom character set 


1110 


14 


E 


6144 


$itoo 


custom character set 


nil 


15 


F 


m» 


$1=400 


custpBs eh^actes set 
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To set the address, you can use POKE 36869,PEEK(36869)AND 
240 OR X where X is the value from the decimal column in Table 

You'll note that no expansion RAM locations can be used for 
this map. 
p-> Bit 3 can be thought of as a ROM/RAM switch. When it's on 

^ (set to 1), RAM is being used; otherwise, the character map is in n 

ROM. 

There was a misprint for this location in the VIC-20 Pro- 
grammer's Reference Guide. Page 215 in the edition I have shows the 
formula: 

POKE 36869,PEEK(36869) AND 15 OR (X*16) 

This should read: POKE 36869,PEEK(36869) AND 240 OR X. 

Because of the way this pointer is used in the VIC chip, once 
you set the start-of -character map pointer, the next 128 characters 
are obtained from the next higher (with wrap) bits 3-0 setting. This is 
a great feature of the VIC chip. You can access the next 128 charac- 
ters by pressing RVSON, the next by pressing RVSOFF/Commodore 
key/SHIFT, and yet another by pressing RVSON again. For exam- 
ple, if you composed a custom character set of 128 characters at 
location 7168 ($1C00) and pressed the RVSON key, the ROM upper- 
case/graphic set at location 32768 ($8000) would be used as long as 
RVSON is in effect. Pressing RVSOFF/Commodore key/SHIFT 
selects the 128 reversed uppercase/graphics. With this feature, you 
can use three-quarters, one-half, one-quarter, or none of the ROM- 
based character maps with your own custom character set. By setting 
the start of character map bits to refer to location 4096 ($1000), you 
will be able to refer to 512 of your own characters. This is the loca- 
tion used for the character set when bitmapping the screen. 

If you need fewer than 128 custom characters, you can copy the 
others that you'll need from ROM into your own set, or simply not 
use the remaining characters. The latter technique is used when 
composing a custom character set for location 7168 ($1C00) on an 
unexpended VIC-20, since there is only room for 64 custom charac- 

nters (8*64=512 bytes) before the start of the screen RAM map area. 
Rather than printing the CHR$ codes for character set switching 
and RVSON or RVSOFF, you can POKE this location, using the 

n value for the needed character set if you want to change all the 

characters on the screen. Also see locations 199 ($C7) and 657 
($291). 

Location 32768 ($8000) contains more information about the 
! J character map. 

Refer to the color map description starting at location 37888 
($9400). 
^ See location 32768 ($8000) for a program to display or print any 
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number of 8 x 8 character map pixel description bytes in a large 
graphic matrix with their decimal numbers noted. 

See the appendices for additional information on bitmapping the i f 

screen, custom character sets, and relocating the screen and character ^ — ' 

maps. 

36870 $9006 VICCRO"^ U 

(handy location) 
Light pen horizontal screen location. 

This address contains the pixel location of the light pen photo- 
cell from the left side of the TV. It's latched here when the raster 
passes the pen tip. It is the light pen that detects the beam of light 
from the raster and causes the position to be latched, not the other 
way around. From the values placed here, which range from to 
255, you can determine the pixel location by using 
COL=PEEK(36870)*.69. 

If your light pen has a switch on it, you will find that location 
37151 ($911F) bit 5 is where it can be detected. 

You will want to debounce this value as it is extremely sensitive 
to imperceptible movement. Debouncing is accomplished by saving 
this value, waiting a reasonable amount of time (maybe a half sec- 
ond — 30 jiffies), and comparing the current value to the last-saved 
value until they are equal or as equal as necessary to determine the 
selected location/option. 

Incidentally, light pen detection on the VIC chip is an optional 
feature. Since the VIC-20 has this optional feature, the VIC chip is 
technically a 6560-101. That's why there's a white spot on the chip. 

You can refer to several excellent articles on the VIC's light pen 
option. "A Light Pen for Under $10," by William Hale, in the 
August 1982 issue of COMPUTE!; "Basics of Light Pen Operation," 
by Robert Peck, in the March 1981 issue of COMPUTE!; and "An In- 
expensive Light Pen for the VIC-20, C-64, and Atari," by David 
Bryson, in the June 1983 issue of Micro, are three such articles. 

See location 36868 ($9004) for additional information. 

36871 $9007 VIGCR7* 

(handy location) 
Light pen vertical screen location. 

This address contains the pixel location of the light pen photo- 
cell from the top of the TV. It's latched here when the raster passes 
the pen tip. 

You can determine the pixel location by using 
ROW=PEEK(36871)*.722. 

See location 36870 ($9006) for debouncing suggestions. 
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36872 $9008 VICCRO 255 

(handy location) 
Potentiometer X/Paddle X value. 

The analog-to-digital converters in the VIC chip can convert 
variable resistance to digital values ranging from to 255, 
incremented by one for every IK ohms of resistance. No connection 
means infinite resistance, so 255 is the default value in this location. 
The game port pin 9 is used for this X value, pin 5 for the Y value, 
and pin 8 for a common ground. 

Paddle values: right=0, left=255. 

See the articles "Using the VIC Game Paddles," by David 
Malmberg, in the April 1982 issue of COMPUTE!, and "$20 VIC 
Digitizer," by Jeff Knapp, in the September 1982 issue of COM- 
PUTE!, for details on the use and construction of game paddles. 

36873 $9000 VIGCRO* 255 

(handy location) 
Potentiometer Y/Paddle Y value. 

Paddle values: right=0, left=255. 

See location 36872 ($9008) for additional information. 

36874 $900A VIGGRA'' 

(handy location) 
Relative frequency of sound oscillator 1 (bass). 

Bit 7: Switch to enable (1) or disable (0) this oscillator. 

By turning off the sound for this oscillator with POKE 
36874,PEEK(36874) AND 127, you can leave the desired value in 
this register for later use. To turn this back on, you can use POKE 
36874,PEEK(36874) OR 128. 

Bits 6-3: Low sound voice (sawtooth waveform). 

This is the softest sound oscillator, with a range of values from 
(no sound) to 127 (highest tone). The range of tones produced runs 
from 31 to 3995 hertz. To compute the value for this location from a 
given frequency, use the following line: 
X=INT(128-(3995/FREQ)) 
where X is the value for this location. 

(Use 4329 rather than 3995 if you are using the European PAL 
television system.) 

The octave ranges for the three VIC-20 oscillators overlap, giv- 
ing a combined range of five octaves, in this way: 
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ngure S-8. Octave Range Oveilap on ttie VIC 

Location Values 

7 »67 ^97 ^111— » 127 

36874 $900A octavel octaveZ octave3 extra 

7 ^67 ^97 •'111-»127 

36875 $900B octavel octave2 octaveS extra 

7 »67 ^97 »1 11-^127 

36876 $900C octavel octave2 octave3 extra 

Low i\otes » high notes 

You can also convert particular notes to numerical values to 
enter in the sound registers. 

Table 5-4. Mu^cal Note to Numerical Value 



u 
u 

D 
u 

u 



Note 


Octave 1 


Octave 2 


Octave 3 




C 


7 


67 


97 


112 


c# 


15 


71 


99 


113 


D 


19 


73 


100 




D# 


23 


75 


101 


Jl 


E 


31 


79 


103 


li 


F 


35 


81 


104 


Too close to 


F# 


39 


84 


105 


distinguish 


G 


47 


87 


107 


li 


G# 


51 


89 


108 


a 


A 


55 


91 


109 


11 


A# 


59 


93 


110 


127 


B 


63 


95 


111 





3687S $900B VMHaiB* 

(handy location) 
Relative frequency of sound oscillator 2 (alto). 

Bit 7: Sv^ritch to enable (1) or disable (0) this oscillator. ! I 

By turning off the sound for this oscillator with POKE 

36875,PEEK(36875) AND 127, you can leave the desired value in „ 

this register for later use. You can turn this back on with POKE | [ 
36875,PEEK(36875) OR 128. 

Bits 6-0: Medium sound voice (pulse waveform). — : 

These bits serve as the medium sound oscillator, with a range of j \ 

values from (no sound) to 127 (highest tone). Its range is from 63 

to 7990 hertz. To compute the value for this location from a given __ 

frequency, you can use: ] I 

U 



n 



n 
n 
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X=INT(128-(7990/FREQ)) 

(Use 8659 rather than 7990 if you are using the European PAL tele- 
vision system.) 

See location 36874 ($900A) for an octave range figure and a 
musical note to numerical value table. 

36876 88660 VIGCRC* 6 

(handy location) 
Relative frequency of sound oscillator 3 (soprano). 

Bit 7: Switch to enable (1) or disable (0) this oscillator. 

Using POKE 36976,PEEK(36876) AND 127 turns off the sound 
for this oscillator and lets you leave the desired value in this register 
for later use. To turn this back on, simply enter POKE 
36876,PEEK(36876) OR 128. 

Bits 6-0: High sound voice (pulse waveform). 

This oscillator's values range from (no sound) to 127 (highest 
tone). Its range is 127-15,980 hertz. To compute the value for this 
location from a given frequency, you can use: 
X=INT(128-(15980/FREQ)) 

(Use 17320 rather than 15980 if you are using the European PAL 
television system.) 

See location 36874 ($900A) for an octave range figure and musi- 
cal note to numerical value table. 

36877 8866D VICIID* 6 

(handy location) 
Relative frequency of sound oscillator 4 (noise). 

Bit 7: Switch to enable (1) or disable (0) this oscillator. 

You can turn off the sound for this oscillator with POKE 
36877,PEEK(36877) AND 127. This will leave the desired value in 
the register for use later. POKE 36877,PEEK(36877) OR 128 will turn 
it back on. 

Bits 6-0: Noise voice (square waveform). 

The sharpest sound oscillator, with values ranging from (no 
sound) to 127 (highest tone), its range is from 252 to 31960 hertz. 
Use the following formula to compute the value for this location 
from a given frequency: 
X=INT(128-(31960/FREQ)) 

(Use 34640 rather than 31960 if you are using the European PAL 
television system.) 

36878 $866E VICCRE"^ 6 

(handy location) 
Sound volume and auxiliary color. 
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36879 








— 


Bits 7-4: Auxiliary color for multicolor mode. A bit value of 11 
selects this auxiliary color. You can use any of the 16 colors: 


Black 

White 

Red 

Cyan 

Purple 

Green 

Blue 

Yellow 





1 

2 
3 
4 
5 
6 
7 


Orange 

1 ^ - Lt Orange 
?> X Pink 

V^ Lt Cyan 
e>^ Lt Purple 
20 Lt Green 
f 6 Lt Blue 
L\x Lt Yellow 


8 '^'^ 

9 /vy 

10 /60 

11 '^'^ 

12 ''^^ 

13 ;!o^ 

14 -2^7 

15 ^VO 


uJ 



However, to set ttiese four bits, you don't simply POKE the 
above numbers into location 36878 ($900E). Instead, to set these 
bits, you'd use; POKE 36878, (PEEK(36878) AND 15) OR (X*l% 
where X is the color value shown above. For instance, to select light 
yellow (15) as the auxiliary color, yom'd POKE 36f7«,(PEEK(36878). 
AMD1S)OR^O. 

Bits 3-0: Sound volume (low) to 15 (high). 

These four bits set the combined volume of all sound oscillators. 

Turning the sound volume to zero does not turn off the 
oscillators; this is done by turning bit 7. The difference between two 
settings, an increment apart, of this value may be hardly noticeable 
on a TV or monitor due to its limited sound system. 

A stereo system, however, will demonstrate the full range of 
volume and tonal control. The VIC-20 puts out a high quality mono- 
phonic sound signal. Use AUX IN or TAPE IN on your sound sys- 
tem, not a turntable input. 

36879 $900F VIGGRF* 27 

(handy location) 
Background color, border color, inverse color switch. 

Bits 7-4: Default value: 1. These four bits determine the background 
color of the screen. Colors available on the VIC are: 



Black 





White 


1 


Red 


2 


Cyan 

Purple 

Green 


3 
4 
5 


Blue 


6 


Yellow 


7 



Orange 
Lt Orange 
Pink 


8 
9 
10 


Lt Cyan 
Lt Purple 
Lt Green 


11 
12 
13 


Lt Blue 


14 


Lt Yellow 


15 



In multicolor mode, this color is selected with bit values of 
binary 00. 
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To set the upper four bits m this location, you would POKE 
36879,(PEEK (36879) AND 15) OR (X*16), where X is a color value 
from the table above. 

Bit 3: Default value: 1. This bit serves as the inverse color switch. 
When set to one, the background and foreground colors are in their 
respective places. Setting this to zero, however, inverts that scheme. 
The foreground color wUl be used for the background and all the 
characters are shaded in the background color. 

This bit has no effect when multicolor mode is in effect for 
individual characters. 

See locations 37888-38911 ($9400-$97FF), Screen Color Maps, 
and 646 ($286) for foreground color descriptions. 

To set to one: POKE 36879, PEEK (36879) OR 8 

To set to zero: POKE 36879, PEEK (36879) AND 247 

Table S-8. Color Codes for Location 36879 



Back- 








Border 










Back- 


ground 


BLK 


WHT 


RED 


CYAN 


PUR 


GRN 


BLU 


YEL 


ground 


BLK 


8 


9 


10 


11 


12 


13 


14 


15 


BLK 


WHT 


24 


25 


26 


27 


28 


29 


30 


31 


WHT 


RED 


40 


41 


42 


43 


44 


45 


46 


47 


RED 


CYAN 


56 


57 


58 


59 


60 


61 


62 


63 


CYAN 


PUR 


72 


73 


74 


75 


76 


n 


78 


79 


PUR 


GRN 


88 


89 


90 


91 


92 


93 


94 


95 


GRN 


BLUE 


104 


105 


106 


107 


108 


109 


110 


111 


BLUE 


YEL 


120 


121 


122 


123 


124 


125 


126 


127 


YEL 


ORG 


136 


137 


138 


139 


140 


141 


142 


143 


ORG 


L.ORG 


152 


153 


154 


155 


156 


157 


158 


159 


L.ORG 


PINK 


168 


169 


170 


171 


172 


173 


174 


175 


PINK 


L.CYN 


184 


185 


186 


187 


188 


189 


190 


191 


L.CYN 


L.PUR 


200 


201 


202 


203 


204 


205 


206 


207 


L.PUR 


L.GRN 


216 


217 


218 


219 


220 


221 


222 


223 


L.GRN 


L.BLU 


232 


233 


234 


235 


236 


237 


238 


239 


L.BLU 


L.YEL 


248 


249 


250 


251 


252 


253 


254 


255 


L.YEL 



Bits 2-0: Default value: 3. These three bits control the border color 
surrounding the screen. 

Available border colors are: 



Black 


Purple 4 


White 1 


Green 5 


Red 2 


Blue 6 


Cyan 3 


Yellow 7 



See locations 36864 ($9000) through 36868 ($9004) for addi- 
tional information. 



139 



140 



u 
u 



u 



To set these three bits, you would enter POKE I I 

36879,(PEEK(36879) AND 240) OR X, where X is a color value from 
the list above. 

If you would like an amber on black screen, for instance, you | j 

would use: 

POKE 36879,8:POKE646,2 (achially red) 

If you would like a black on amber screen, try: 

POKE 36879,136:POKE646,0 

36880-37135 $S0I0-$9I0F 

Future expansion RAM/ROM space. 

This area of the VIC-20 contains apparent reflections of the VIC 
chip registers. These reflections are not reliable and should not be 
used. This area is not on RAM or ROM, and it's only because o* the 
address decoding scheme used that the VIC chip registers seem to be 
reflected here. This area really is available for future expansion. You 
are really accessing the VIC chip registers when POKEing here, and 
a PEEK to this area has a good chance of returning erroneous values. 
You can use the VIC chip registers directly and avoid many 
problems. 

If you refer to the article "VIC Memory — The Uncharted Adven- 
ture," by David Barron and Michael Kleinert, in COMPUTEI's First 
Book of VIC, subtract 16 from the locations listed over 36880. You'll 
then have the VIC chips which perform the functions the authors 
have noted. 
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Versatile Interface 

Adapters 
VIA I and VIA 2 
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37136-37151 



Veisatile Interface 
Adapters VIA 1 and 
VIA 2 



Location Range: 37I36-371S1 ($9110-$9UF) 

6522 Versatile Interface Adapter 1 

The 6522 Versatile Interface Adapters (VIAs) provide keyboard, 
tape, joystick, serial, RS-232, and user port input/ output control, as 
well as RUN/STOP-RESTORE key and IRQ interrupt timing facil- 
ities. Interrupts, timing, and input/output are keys to the successful 
functioning of the VIC-20. Serial to parallel and parallel to serial 
shift registers are also provided in the VIAs, but are not used on the 
VIC-20. The IEEE-488 bus of the earlier PET computers has been 
stripped down to the serial bus on the VIC-20. However, IEEE-488 
adapters are available and allow the use of PET peripherals on the 
VIC-20. 

Programming the VIAs is not as simple as for the other chips in 
the VIC-20. VIAs are complex, and require some study and experi- 
mentation before practical use can be made of them. The Kemal uses 
the VIAs extensively, and you'll need to learn how to work around 
the Kernal's use of the VIAs. When the function associated with each 
bit is not being used by the Kemal, you're free to use that bit for 
your own purposes, within the scope of the architecture of the 6522. 
These locations should not be used to store user data that is unasso- 
ciated with 6522 operations. 

Nick Hampshire investigates the VIA and how it is used in the 
VIC-20 in his book VIC Revealed. The V/C-20 Programmer's Reference 
!~1 Guide includes a description, although only the first VIA is men- 

■ ' tioned and no relationship is shown to the actual use by the VIC-20 

of the various locations. The schematic in the back of the book pro- 
r-^ vides many insights into the use of the 6522 chips. Programming the 

i I PET/CBM by Raeto Collin West explains the VIA from the perspec- 

tive of PIAs (PETs have two PIAs and VIAs). Specification sheets for 
p^ the 6522 are available from MOS Technology. Rodnay Zaks has 

; j explored the 6522 architecture in his 6502 series of books. Another 

resource is Marvin L. Dejong's Programming and Interfacing the 6502, 
■with Experiments; his article "Timing and Counting with the 6522," 
r~| in the July 1982 issue of Micro, is also something you might want to 

refer to. 
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Let's get into the specifics of how the VIC-20 uses these VIAs. 

The 6522 VIA chip registers are actually located in the VIA 
chips themselves. No RAM locations correspond to these VIA reg- I 

isters. When POKEing or PEEKing values, you are actually accessing 
the VIA chips themselves. Special rules for reading and writing bytes 
may sometimes apply. 

Power-on/reset and the RUN/STOP-RESTORE keys cause 
these values to be reinitialized by the INITVIA* routine. 



The user port pins and their associated bits in this VIA are 
detailed in Table 6-2. 



u 



The Fbst 6522 VIA Chip's Registers 

This VIA's IRQ (interrupt request) line is connected to the 6502 
IRQ interrupt line. The VIA generates an IRQ interrupt for many rea- 
sons, but the most visible is the RESTORE key. This VIA manages 
most of the pins on the user port/RS-232 port. Additionally, the 
tape switch and motor, most serial port pins, the light pen/fire but- 
ton pin, and most of the joystick pins are controlled by this VIA. 
This VIA offers the most available lines for your use. When the func- 
tion associated with each bit is not being used by the Kemal, you're 
free to use that bit for your own purposes. 

The serial port pins and their associated bits in this VIA are: 

Table 6-1. Serial Port Pins 

Port Port VIA 

Pin /bit Line Use 

1 (VIA2,CB1) serial service request in 

2 ground 

3 serial attention in, tied to user port 9 
A7 PA7 inverse serial attention out 

4 AO PAO serial lock in 
(VIA2,CA2) inverse serial clock out 

5 Al PAl serial data in 
(VIA2,CB2) inverse serial data out 

6 reset RESET (ground this to pin 2 for a ; ] 

RESET SWITCH) U 
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37136-371B1 



Table 6-2 


. User Port Pins 










Port 


Port 


VIA 




In/ 


X-Line 


DB25 


EIA 


Pin 


/bit 


Line 


Use 


Out 


3-Line 


Pin 


Name 


A 






protective ground 




3,X 


1 


AA 


B 




CBl 


received data (SIN) 


IN 


3,X 


3 


BB 


C 


BO 


PBO 


received data (SIN) 


IN 


3,X 


3 


BB 


D 


Bl 


PBl 


request to send (RTS) 


OUT 


X,3=hi 


4 


CA 


E 


B2 


PB2 


data terminal ready 
















(DTR) 


OUT 


X,3=hi 


20 


CD 


F 


B3 


PB3 


ring indicator (RI) 


IN 




22 


CE 


H 


B4 


PB4 


received line 
















signal (DCD) 


IN 


X 


8 


CF 


J 


B5 


PBS 


unused 










K 


B6 


PB6 


clear to send (CTS) * 


IN 


X 


S 


CB 


L 


B7 


PB7 


data set ready (DR) 


IN 


X 


6 


CC 


M 




CB2 


transmitted data (Sout)OUT 


3,X 


2 


BA 


N 






signal ground 




X 


7 


AB 


1 






ground 










2 






+5 volts DC 










3 






reset RESET (ground 
this to pin 1, A, or 12 
to cause a RESET 
SWITCH function) 










4 


A2 


PA2 


joy 0, also on game 
port pin 1 










5 


A3 


PA3 


joy 1, also on game 
port pin 2 










6 


A4 


PA4 


joy 2, also on game 
jort pin 3 










7 


A5 


PAS 


ight pen/fire button, 

also on game port pin 

6 

tape sense switch tied 










8 


A6 


PA6 
















to this pin 










9 


A7 


PA7 


inverse serial attention 
out 










10 






9 volts AC 










11 . 






9 volts AC (incorrectly 
labeled GND in the 
VJC-20 Programmer's 
Reference Guide) 










12 






ground 











•Because of the coding problem mentioned at 660 ($294), the clear to send missing bit 
will never be set in the RS-232 status byte at 663 ($297). You can still use this pin by 
testing this bit yourself. 
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Table 6-3 details the game port pins and their associated bits in 
this VIA. 



Table 6-3. Game Port Pins 



Port 


Port 


VIA 




Pin 


/bit 


Line 


Use 


1 


A2 


PA2 


joy 0, also on user port 4 


2 


A3 


PA3 


joy 1, also on user port 5 


3 


A4 


PA4 


joy 2, also on user port 6 


4 


(V1A2,PB7) 


joy 3 


5 


(see VIC chip) 


jotentiometer Y 


6 


A5 


PAS 


ight pen/fire button 


7 






+5 volts DC 


8 






ground 


9 






(see VIC chip) potentiometer X 



The tape port pins and their associated bits in this VIA are dis- 
played below in Table 6-4. 

Table 6-4. Tape Port Pins 



Port 


Port VIA 




Pin 


/bit Line 


Use 


A-1 




ground 


B-2 




-1-5 volts DC 


C-3 


CA2 


tape motor 


D-4 


(see VIA2,CA1) 


tape read 


E-5 


(see V1A2,PB3) 


tape write 


F-6 


A6 PA6 


tape switch also on user port 8 
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The keyboard connector pins are diagrammed in the preface to 
VIA 2 at location 37152 ($9120). 

The individual registers are outlined below, listed by location. 

37136 $9110 VIAIPB* 

Port B I/O register. 

This port is used for parallel user port data transfer, in and out. 
In the VIC-20, the user port is designed for RS-232 protocol 
handshaking and data transfer. 

For the electronics-oriented user: This port is a push-pull type 
wdth high impedance input, with a I not greater than -t-2.4 volts; 
TTL compatible, but not CMOS; supporting direct connection to , - 
Darlington transistor switches for relays. 1 I 

Handshaking control lines CBl and CB2 are controlled by this 
VIA port, and when reading or writing these bits, bits 4 and 3 of 
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location 37149 ($91 ID) are automatically reset. Location 37148 
($91 IC) is used to control the CBl and CB2 status. 

The RS-232 standard specifies that a logical 1 is a voltage more 
negative than —3 volts, and a logical is greater than +3 volts. 
Since the VIC-20 uses to 0.8 volts for logical and 2.4 volts and 
greater for a logical 1, a TTL level to RS-232 level interface of two 
integrated circuit chips is needed to connect a true RS-232 device to 
the VIC-20. These are commercially available as an RS-232 interface 
board providing a DB25 connector for the desired RS-232 device to 
plug into. United Microwrare Industries in Pomona, California, can be 
contacted, or you can build your own. See "The Enhanced VIC-20: 
Part Four," in the May 1983 issue of BYTE magazine for details of 
constructing an interface. The VIC Modem has these ICs built in, 
and several other modem manufacturers include them on VIC-20 
models. 

A typical application for this location is an RS-232 printer, por 
this type of use, be sure that Data Set Ready (DSR) from the printer 
is connected to the VIC-20 Data Terminal Ready (DTR) pin so the 
printer can pause the VIC-20 until the printer catches up. X-line 
handshaking is needed for this type of printer use. See the article 
"VIC RS-232 Printer," by Michael V. TuUoch, in the Febniary 1983 
issue of Micro, for another approach to the printer hold-off. It's a 
good idea to consult your printer manual for interface cable require- 
ments, baud rate specifications, control characters, linefeed options, 
and switch settings. 

The following bits can be used as input or output, depending on 
the setting of the data direction register at 37138 ($9112). At power- 
on/reset, all these bits are set to the input mode. When an RS-232 
device is opened or closed, DTR and RTS (Request To Send) are set 
on. The direction during RS-232 use is shown below for each bit. 
Bit 7: Data Set Ready (DSR) IN X-line 

If set as an output line, you can optionally pulse or invert this 
line when VIA timer 1 expires. This can happen continuously when 
the free-running mode is selected. 

See locations 37147 ($911B) and 37138 ($9112). 
Bit 6: Clear To Send (CTS) IN X-line 

Because of the coding problem mentioned at 660 ($294), the 
clear to send missing bit vAll never be set in bit 4 of 663 ($297). You 
may test this bit yourself when using the line. 

If this is used as an input line, you can optionally count neg- 
ative pulses on this line when VIA timer 2 is in the free-running 
mode. 

See location 37147 ($91 IB) and 37138 ($9112). 
Bit 5: unused 
Bit 4: Data Carrier Detect (DCD) IN X-line 

This is sometimes called received line signal. 
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Bit 3: Ring Indicator (RI) IN 

Bit 2: Data Terminal Ready (DTR) OUT X-line 

This bit, DTR, is always on in three-line mode. , j 

Bit 1: Request To Send (RTS) OUT X-line l-J 

RTS is always on in three-line mode. 
Bit 0: Received Data Signal (Sin) IN X-line, 3-line 

By making or obtaining the proper connector, a second joystick can 
be plugged into the user port using: 

PBl = joy 3 
PB2 = joy 
PB3 = joy 1 
PB4 = joy 2 
PBS = fire 

See "Fighter Aces: Add a Second VIC Joystick," by John Parr, in 
the March 1981 issue of COMPUTE!, for details. 

37137 $9111 VlAlPAl* 

Port A I/O register. 

This port is used for serial port and game port data transfer, 
both in and out. In addition, the tape sense switch is controlled 
through this port. 

Handshaking control lines CAl and CA2 are managed by this 
port, and when reading or writing these bits, bits 1 and of location 
37149 ($911D) are automatically reset. Location 37148 ($911C) is 
used to select the CAl and CA2 status. 

A mirror port A register is located at location 37151 ($911F) and 
can be used instead of this register when you don't want to reset 
CAl and CA2 by accessing the register. 

For the electronics-oriented user: This port is a pull-up type with 
a resistive nature. Even in input mode, current is supplied to the 
pins, and these lines represent a TTL LOAD. 

The following bits can be used as input or output, depending on 
the setting of the data direction register at location 37139 ($9113). 
Bit 7: serial attention out. - 

Serial attention in is reflected on user port pin 9. | j 

Bit 6: sense tape button down. 

A value of 1 in this bit means that there are no tape buttons 
down, while a value of means that there are some down. ) I 

Note that user port pin 8 is also tied to this line. (Line number) ' 

IF (PEEK(37151) AND 64)=1 AND ST=0 THEN (Line number) can 
be used as a method of determining if all data has been sent on the 
RS-232 line before closing device number 2. Location 37151 ($911F), 
bit number 6, is a mirror of this bit. 
Bit 5: light pen/fire button. 
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A value of 1 means the light pen switch or the fire button was 
not pressed. 
'^ You can make your program wait for the fire button or light pen 

switch to be pressed by including WAIT 37137,32,32 in the program. 
If you'd like your program to wait only until the fire button is 
released, you would use WAIT 37137,32 instead. 

Bit 4: joy 2 (left/west). 

A value of 1 means this direction was not selected. 
Bit 3: joy 1 (dovm/south). 

A value of 1 in this bit signals that this direction was not 
selected. 
Bit 2: joy (up/north). 

A 1 in this bit means that this direction was not selected. 
Bit 1: serial data in. 

Serial data out is reflected in VIAl CB2. 
Bit 0: serial clock in. 

Serial clock out is reflected in VIAl CA2. 

The standard joystick reading routine for the VIC in BASIC is 
shown below. Note that actual line numbers have not been included. 
You can add them yourself so that you can place this routine any- 
where within your own program. 

POKE 37154,127 : REM set data direction register, 

: REM some keyboard keys ignored. 
A=(PEEK(37137) AND 28) OR (PEEK(37152) AND 128) 

: REM combine joystick values into variable A 
POKE 37154,255 : REM reestablish keyboard scan 
B=PEEK(37137) AND 32 

: REM B=0 if fire button pressed 
A=ABS((A-100)/4)-7 

: REM reduce variable A to manageable range of values 
ON A GOSUB 100,110,120„130,140,150„„160,170,180 

: REM go do the proper routine 

100 PRINT "down-left (south-west)" : RETURN 

110 PRINT "up-left (north-west)" : RETURN 

120 PRINT "left (west)" : RETURN 

130 PRINT "down (south)" : RETURN 

140 PRINT "up (north)" : RETURN 

150 PRINT "still (center)" : RETURN 

160 PRINT "right (east)" : RETURN 

170 PRINT "up-right (north-east)" : RETURN 

180 PRINT "down-right (south-east)" : RETURN 

This routine is detailed in the article "The Joystick Connection: 
Meteor Maze," by Paul L. Bupp and Stephen P. Drop, in COM- 
PUTE'S First Book of VIC. 
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Additional joystick articles can be found in "Using a Joystick," 
by David Malmberg, in COMPUTEI's First Book of VIC; "Using Atari 
Joysticks with Your VIC/' by Christopher Flynn, in the June 1982 ] j 

issue of COMPUTE!; and the VIC-20 Programmer's Reference Guide, ^ 

page 246. 

37138 $9U2 VIAIDDRB* U 

Data direction register for port B. 

Each of these eight bits corresponds to the same-numbered bit 
in port B. When a bit in this register is set to 0, the corresponding 
port B bit is used for input. A 1 in a bit of this register indicates an 
output function in the port B related bit. Port B is located at 37136 
($9110). 

Also see 37147 ($91 IB) bit 1 for port B latch enable bit. If input 
latching is disabled, any input directed port B bits will, at any time, 
show the current associated pin status of high or low. Latched mode 
reads data only when a transition on CBl line occurs. See location 
37148 ($9nC). 

Power-on/reset and the RUN/STOP-RESTORE keys cause 
initialization to 00 ($00), all lines input, by the INITVIA* routine. 

37139 $9113 VIAIDDRA* 

Data direction register for port A. 

Each bit in this register corresponds to the same-numbered bit 
in port A. When one of these bits is set to 0, the corresponding bit in 
port A is used for input; bits in this location set to 1 signify an out- 
put function in the port A related bit. Port A is located at 37137 
($9111) and is also reflected at location 37151 ($911F). 

Also see 37147 ($91 IB) bit for port A latch enable bit. If input 
latching is disabled, any input directed port A bits will, at any time, 
show the current associated pin status of high or low. Remember 
that latched mode reads data only when a transition on CAl line 
occurs. See location 37148 ($911C). 

Power-on/reset and the RUN/STOP-RESTORE keys reinitialize 
this register to 128 ($80) (serial attention out for output, rest for 
input) through the INITVIA* routine. 

37140 $9114 VIAITICL'^ 

Timer 1 least significant byte (LSB) of count. 

This timer is used for RS-232 and user port transmit/receive and 
tape write timing. 

When setting this byte, the timer 1 latch at location 37142 1 I 

($9116) is set with the desired value rather than this location. Refer 
to location 37143 ($9117) for the sequence of loading timer 1 and 
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the resulting 6522 actions. Location 37159 ($9127) details the tech- 
nique used to calculate the value to place in timer 1 to accomplish 
the desired interval before an interrupt occurs. 

37141 $9115 VlAlTlClf 

Timer 1 most significant byte (MSB) of count. 

This location is used with the LSB of count that was stored in 
location 37140 ($9114). See the description and references at that 
location. The timer may be started again without an interrupt by 
storing a new value in this location. 

Setting this byte of timer 1 starts the timer. See location 37143 
($9117) for a description of this effect. 

The OPENRS* routine calculates the values for timer 1 and 
timer 2 and stores the result in location 665-666 ($299-29A) until 
they're needed for timing of the RS-232 session protocol. 

37142 $9116 VIAITILL* 

Timer 1 low order (LSB) latch byte. 

Refer to location 37143 ($9117) for the description of this byte's 
use. 

37143 $9117 VIAITILH* 

Timer 1 high order (MSB) latch byte. 

This timer is used by the Kemal for tape and RS-232 timing. 
The INITVIA* routine disables the PB7 output mode and selects 
the free-running mode. 

The steps and effects involved in using timer 1 are: 

• The programmer chooses the time interval desired, whether it 
is to be a one-shot time interval or free-running mode, and whether 
PB7 is to be pulsed when the timer expires. If PB7 output is selected, 
be sure to set bit 7 of 37138 ($9112) to 1, which allows output on 
PB7. 

• The control register at 37147 ($91 IB) is set to the options 
desired. 

The interrupt enable bits are set or cleared in location 37149 
($91 ID). See that location for details. 

• Store the LSB of the timer period desired in 37140 ($9114). 

• Store the MSB of the time period in 37141 ($9115). This 
causes the VIA to also copy the value into this location, and starts 
the countdown of timer 1. This is preceded by the VIA copying the 
values in location 37142 ($9116) into location 37140 ($9114), the 
low order latch into the low order counter. The flag register at 
address 37149 ($911D), bit 6, is set to 0, and if the PB7 output 
option was specified, the PB7 line is pulled low to 0. 
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• The counter in timer 1 counts down at the rate of the system 
clock. See the description of the clock rate at location 37159 ($9127). 

• When the count in timer I's LSB and MSB reaches zero, the , , 
flag in 37149 ($91 ID) bit 6 is set to 1, an NMI interrupt is signaled 1_J 
to the 6502 if the bits in 37150 ($91 IE) allow it, and PB7 line is 

pulled high or inverted. It's inverted if this was opted for in location 

37147 ($911B), whether or not the interrupt has been enabled in |_J 

location 37149 ($91 ID). 

In free-running mode, the values from the latches are reloaded 
into the counter bytes automatically and the countdown starts anew, 
generating an interrupt every time the count expires, and generating 
a waveform on PB7 if its output was selected. A complex waveform 
can be generated on PB7 by the following steps: 

1. Set timer 1 count bytes with value A. 

2. Set timer 1 latch bytes with value B. 

3. When bit 6 of 37149 ($91 ID) is set by the VIA, load the next 
desired value into the latches. This value is loaded into the counters 
when the current counters expire. 

4. Read the timer 1 count LSB to clear the bit 6 flag in 37149 
($91 ID). 

5. Go to step 3. 

• The interrupt flag is not cleared until the timer 1 counter LSB 
is read or the MSB is modified by the program. 

37144 $9118 VIA1T2CL'' 

Timer 2 low order (LSB) counter and LSB latch. 

Putting a value in this byte initializes the latch component, 
while reading this location obtains the value stored here and resets 
the 37149 ($91 ID) interrupt flag. 

See the more detailed description of this byte at location 37145 
($9119). 

37145 $9119 V1A1T2CH* 

Timer 2 high order (MSB) counter and MSB latch. 

Timer 2 can be used as an interval timer or a pulse counter. 

The Kemal uses timer 2 to time the receive side of RS-232 for i ) 

RS-232 NMI routines. The INITVIA* routine sets tuner 2 to be an 

interval timer. However, bit 5 of location 37147 ($911B) can select 

the mode of timer 2 as either an interval timer or PB6 pulse counter. I j 

Bit 5 of location 37149 ($91 ID) is the interrupt flag, and bit 5 of ^ 

location 37150 ($91 IE) is used to enable the interrupt generated by 

timer 2. 

Putting a value here initializes the latch component and stores 
the LSB latch into the LSB counter component. The interrupt flag in 
37149 ($91 ID) is cleared, the IRQ line is reset, and the timer is 
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started. This occurs whether timer 2 is active or not, and so can be 
used to retrigger it. Reading this location obtains the value stored 
here. 

In order to use this as an interval timer, several things need to 
be done: 

• Set the enable flag in bit 5 of 37149 ($911D), if desired. 

• Set the mode for timer 2 in location 37147 ($91 IB). 

• Store the desired value in the LSB byte. 

• Store the MSB of the time period in location 37145 ($9119). 
This begins the countdown of timer 2. First the VIA copies the low 
order latch into the low order counter, and then the flag register 
37149 ($91 ID) bit 5 is set to 0. 

• The count in timer 2 is counted down at the rate of the system 
clock. See the description of the clock rate at location 37159 ($9127). 

• When the count in timer 2's LSB and MSB reaches zero, the 
flag in 37149 ($91 ID) bit 5 is set to 1 and an NMI interrupt is sig- 
naled to the 6502 if the bits in 37150 ($91 IE) allow it. 

• The counter in timer 2 is allowed to roll over and begin count- 
ing down from 65535 ($FFFF). This tells an interrupt routine how 
long ago the interrupt occurred. 

The steps are somewhat different when timer 2 is used as a PB6 
pulse countdown counter: 

• Set the enable flag in bit 5 of 37149 ($91 ID), if desired. 

• Set the mode for timer 2 in 37147 ($91 IB). 

• Set the data direction register for input on PB6. 

• Determine the number of pulses to be counted. Timer 2 counts 
down from this value and sets the interrupt flag at rollover from to 
65535. The NMI interrupt is signaled if the interrupt for this timer is 
enabled at location 37150 ($91 IE). 

• Store the LSB of the count desired. 

• Store the MSB of the count desired. This starts the count. 

• When a negative pulse is detected on PB6, the counter will be 
decremented. 

• The interrupt bit can be cleared by reading the LSB of the 
count; the countdown can be retriggered by writing to the MSB. 

Timer 2 can also be used as a shift clock for the shift register at 
37146 ($91 lA). See the description of that location. 

37146 $911A VIAISR* 

Shift register for parallel/serial conversion. 

The Kemal does not use this shift register. 

The shift register provides a mechanism to convert between 
serial and parallel data and may be used for communicating with 
devices on the user port of the VIC-20. This VIA does not have a 
connection from CBl and CB2 to the serial port, so this shift register 
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may be used for the user port only. 

Serial I/O is slower but simpler than parallel I/O. A 4040 disk 
drive on an IEEE-488 card installed in the VIC-20 parallel user port 
is at least eight times as fast as the serial 1540/1541 disk drive. 

The shift register can also be used to perform variable frequency 
pulsing of an output line. 

Bit 2 of both the interrupt enable register and the interrupt flag 
register corresponds to the shift register. 

Bits 4-2 of the auxiliary control register at 37147 ($91 IB) are 
used to select the shift register mode. 

The shift register shifts out bit 7 onto the CB2 line. Storing a 
value in the shift register starts the shift out. When it's used for 
input, the bit from CB2 is put into bit 0. 

Reading or writing the shift register starts the shift in. To shift in 
the next byte of data, the value shifted into the register is read. Bits 
are shifted and stored/sent whenever a pulse is detected on line 
CBl. The shift register is shifted one bit to the left afterward. 

This pulse can be generated in several ways. An external clock 
(i.e., disk drive) can pulse the CBl line up to 511.36 kHz. Or the 
system clock can be converted to a value up to 511.36 kHz and used 
to clock CBl. The LSB of timer 2 can even be used as a delay 
between CBl pulses. A shift counter counts the CBl pulses and sets 
the interrupt flag after the eighth shift. In free-running mode, the 
pulse counter is not used and the bits circulate within the shift 
register. 

See the VIC-20 Programmer's Reference Guide, page 232, for 
details of using the shift register to obtain sound from the user port. 



37147 $911B 

Auxiliary control register. 

The auxiliary control register is used to control the options asso- 
ciated with timer 1, timer 2, the shift register, and the way that port 
A and B are latched with data. 

The Kernal initializes this register to 64 ($40) when power-on/ 
reset or the RUN/STOP-RESTORE keys are pressed. See the bit 
descriptions below marked with an asterisk (*) for the default values. 

The bits and possible values in this location are: 

Bits 7-6: Timer 1 options 

See the description of timer 1 starting at location 37140 ($9114) 
00 single interval mode, no PB7 output pulses 
*01 free-running mode, no PB7 output pulses 

10 single interval mode, PB7 negative pulsed 

11 free-running mode, PB7 square wave (invert last pulse) 
Bit 5: Timer 2 options 

See the description of timer 2 starting at location 37144 ($9118). 
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*0 single interval timing 

1 countdown incoming PB6 pulses 
P~| Bits 4-2: Shift register options 

See the description of the shift register starting at location 37146 
($911 A). 
f^^ *000 shift register disabled 

001 input data on line CB2 to shift register bit 0, using timer 2 
LSB; output clock pulses on line CBl. 

010 input data on line CB2 to shift register bit 0, using system 
clock; output clock pulses on line CBl. 

Oil output data on line CB2 from shift register bit 7, using timer 
2 LSB; recirculate bit 7 to bit 0, free running. CB2 can be connected 
to an amplifier for sound. 

100 output data on line CB2 from shift register bit 7, using timer 
2 LSB as delay clock. 

110 output data on line CB2 from shift register bit 7, using sys- 
tem clock 

111 output data on line CB2 from shift register bit 7, using the 
external clock input on CBl. 

Bit 1: Port B latch enable options 

Port B is located at 37136 ($9110). 
*0 Port B to reflect changing values on pins 
1 Port in latch mode. If used for input, port B will show the sta- 
tus of the lines when a CBl interrupt occurred. Otherwise, the 
changing status of the lines is not reflected in the port. 
Bit 0: Port A latch enable options 

Port A is located at 37137 ($9111) and 37151 ($911F). 
*0 Port A to reflect changing values on pins 
1 Port in latch mode. If used for input, port A will show the sta- 
tus of the lines when a CAl interrupt occurred. Otherwise, the 
changing status of the lines is not reflected in the port. 



37148 $9IIG 

Peripheral control register for handshaking. 

This byte contains the options for CAl, CA2, CBl, and CB2 
lines. The mirror of port A that is at location 37151 ($911F) can be 
used instead of port A, if you do not want to affect the port A 
related control line. 

The following Kemal routines modify the Peripheral Control 
Register (PCR): 

• IRQ examines bits 3-1 to detemune if the tape motor should 
be turned off. 

• CLOSE for an RS-232 device sets this back to initial values. 

• OPENRS for an RS-232 device sets this back to initial values. 

• TAPE turns on the tape motor. 
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• TNOFF turns off the tape motor. 

• SEROUTl* turns off bit 5 to send a 1 to the device. 

• SEROUTO* turns on bit 5 to send a to the device. s J 

The INITIA* Kemal routine sets this byte to the bit values 
marked with an * below when power-on/reset or the RUN/STOP- 
RESTORE keys are pressed. > I 
Bits 7-5: CB2 line control. CB2 is used for serial data out, interrupt ^^ — ^ 
input, device output, or shift register input or output. In the latter 
case, these bits are ignored. The interrupt flag register (IFR) is at 
location 37149 ($91 ID). Bit 3 of the IFR is used for a CB2 interrupt. 

000 Input mode 

This value sets IFR bit 3 on a high to low transition of CB2 and 
clears the IFR bit 3 when port B is read or written to. 

001 Input mode 

These bit values set IFR bit 3 on a high to low transition of CB2, but 
do not clear IFR bit 3 when port B is read or written to. IFR bit 3 is 
cleared by writing a 1 to it. 

010 Input mode 
This value sets IFR bit 3 on a low to high transition of CB2 and 
clears IFR bit 3 when port B is read or written to. 

Oil Input mode 
This sets IFR bit 3 on a low to high transition of CB2, but does not 
clear IFR bit 3 when port B is read or written to. IFR bit 3 is cleared 
by writing a 1 to it. 

100 Output mode (handshake) 

This sets CB2 line to low when port B is written to. CB2 will be set 
high when a CBl transition occurs. 

101 Output mode (pulse) 

CB2 line is set low for one cycle when port B is written to with this 
bit value. 

110 Output mode (manual) 
This value sets CB2 to be held low. 

*111 Output mode (manual) 
CB2 to be held high when this value is selected. This is the default 
setting for these three bits. r i 

Bit 4: CBl line control. CBl is used to accept an interrupt for '' — ' 
received data, as a transition of voltage control line, and as output 

for the shift register clocking pulses. The fourth bit of the IFR (Inter- -. . 

rupt Flag Register) at 37149 ($91 ID) is used to flag a CBl interrupt. LJ 

*0 IFR bit 4 is set on a high to low transition of CBl when the 
bit is set to this value. This is the default setting of this bit. 

1 IFR bit 4 is set on a low to high transition of CBl. \ j 

Bits 3-1: CA2 line control. CA2 is used for tape motor control. 

(By VIA design, it could be used for interrupt input or device 

output.) j I 
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The bit of the IFR at 37149 ($91 ID) is used to flag a CBl interrupt. 

000 Input mode 

fn This value sets IFR bit on a high to low transition of CA2 and 

' clears CA2 if port A is read or written to. 

001 Input mode 

P-] Sets IFR bit on a high to low transition of CA2, but does not clear 

' ! it if port A is read or written to. IFR bit is cleared by writing a 1 to 

it. 

010 Input mode 
Setting the three bits to this value sets IFR bit on a low to high 
transition of CA2 and clears CA2 if port A is read or written to. 

Oil Input mode 
Sets IFR bit on a low to high transition of CA2, but does not clear 
it if port A is read or written to. IFR bit is cleared by writing a 1 to 
it. 

100 Output mode (handshake) 

Selecting this value sets CA2 low when port A is read or written to. 

101 Output mode (pulse) 

This value outputs a one-cycle pulse of following a read or write of 
port A. 

110 Output mode (manual) 
CA2 is held low with this value. 
*111 Output mode (manual) 

The default setting for these three bits, this holds CA2 high. 
Tape motor: 12,14=on; 2,4/6,10=off 
To read: 110=on; lll=off 
To set: lll=on; 110=never on 
lll,110=on; any non-llx=off 

A nonzero value in 192 ($C0), which is possible only if some 
tape buttons are down, prevents any change of tape motor switch — 
within the default IRQ routine only. 

During tape read or write, location 192 ($C0) is set to nonzero 
once a tape button has been pressed and will be reset to once the 
tape action is completed. A value here, which is possible with 
either some buttons down or no buttons down, allows the tape 
motor to be turned on within the normal IRQ routine if location 

37148 ($91 IC) has bits 2 and 3 on. This location has no control over 
tape motor settings outside of the default IRQ handler . 

Bit 0: CAl line control. This is directly wired to the RESTORE key. 
A CAl line can normally be used to generate an interrupt on a 
high to low or low to high transition of CAl. Bit 1 of the IFR at 

37149 ($91 ID) is used to flag a CAl interrupt. As you realize by 
now, a CAl interrupt on VIA 1 causes an NMI interrupt on the 6502 
chip. The VIA can still generate interrupts while the NMI is pro- 
cessed by the 6502. An NMI interrupt can interrupt a previous one, 
stacking the previous interrupt's information for later processing. The 
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expansion port also has a line (pin W) that connects to the 6502 
NMI pin. 

IFR bit 4 is set on a high to low transition of CBl. | i 

*1 IFR bit 4 is set on a low to high transition of CBl. LJ 

The effect of placing values in this location, using the statement 
POKE 37148,(PEEK(37148)AND 241)OR nn I j 

where nn is: 

0, 2, 4, 6 Stops the motor 

8 No change 

10 Stops the motor 

12, 14 Starts the motor 

37149 $9UD VIAIIFR'^ 

Interrupt flag register (IFR). 

This register is used to generate a VIA IRQ to the 6502 NMI line 
when any of bits 1-6 are on. The corresponding bit in the interrupt 
enable register (lER) at location 37150 ($91 IE) must be set at 1, 
signifying an interrupt enabled, and bit 7 of the lER must also be on. 
This is accomplished by the VIA tying bit 7 of this location to the 
6502 NMI line. Bit 7 is turned on when any other bit in this byte is 
flagged, or turned on. Note that when reading bit 7 of the lER, it 
will always be presented as a one, but could in fact be a zero. It 
takes an explicit write to bit 7 to insure its state. 

The conditions that set and clear the interrupt flag bits are 
reviewed here and are also discussed at location 37148 ($91 IC), but 
you can also set or reset a flag by simply setting the appropriate bit 
in this location. 

When the NMI routine gets control, it tests for the RESTORE 
key being pressed; if the STOP key is not also pressed, it ignores the 
RESTORE key. It then checks for and starts any ROM at location 
40960 ($A000). If no ROM is present, it checks for a timer 1, timer 2, 
or RS-232 receive interrupt. If the shift register, CA2, or an RS-232 
output interrupt is present, it's not handled by the NMI routines. 

The interrupt flags have the following meaning: 

Bit 7: IRQ (NMI) 

This bit is set by any enabled interrupt flag bit being set. By 
storing a here, you clear all interrupts. It's also reset if all other 
interrupt flags are currently set to 0. 
Bit 6: Timer 1 interrupt 

This bit is set by an expiration of timer 1, and reset when a read 
of timer 1 LSB or a write of timer 1 MSB takes place. 
Bit 5: Timer 2 interrupt 

Set by expiration of timer 2, this bit is reset when a read of 
timer 2 LSB or a write of timer 2 MSB occurs. 
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Bit 4: CBl transition interrupt 

Bit 4 is set by the transition of the CBl line and reset by a read 
l~1 or write on port B. 

' ' Bit 3: CB2 transition interrupt 

This bit is set by the transition of the CB2 line and reset by a 

nread or write on port B. 
Bit 2: Shift register interrupt 

Set by eight shifts of the shift register, this bit is then reset by a 
read or write to the shift register. 
Bit 1: CAl transition interrupt 

Bit 1 is set by a transition of the CAl line and reset by a read or 
write of port A. 
Bit 0: CA2 transition interrupt 

This bit is set by a transition of the CA2 line and reset by a read 
or write of port A. 

37150 $9IIE VIAIIER"^ 82 

Interrupt enable register (lER). 

This byte is used to indicate which interrupt flags in location 
37149 ($91 ID) (the IFR) should cause a VIA IRQ to the 6502 NMI 
line. The interrupt bits in the IFR are set and reset regardless of the 
programmer's wish to ignore or detect a particular condition. This 
byte provides the programmer with a means to control the genera- 
tion of the VIA IRQ. 

Each bit in this byte corresponds to the same-numbered bit in 
the IFR, except for bit 7, which is a control bit. If bit 7 is set to 1, all 
the following bits in this byte that contain a 1 enable the 
corresponding bit in the IFR. For example, if this byte contained 
binary 1010 0101, then interrupt bits 5, 2, and of the IFR would be 
enabled. This would cause a VIA IRQ if those IFR bits were turned 
on. 

If bit 7 is set to 0, the remaining bits in this byte that are set to 
1 indicate the correponding bits in the IFR that are to be disabled. 
Binary 0101 1010 placed into this byte, for instance, would cause 
bits 6, 4, 3, and 1 to be disabled in the IFR. 

In practice, you would disable the bits of the IFR that you wish 
to ignore, then enable those that you wish to use. 

A value of binary 0111 1111 ($7F) would disable all interrupts, 
while binary 1111 1111 ($FF) would enable all. 

This byte must be set by POKEing a value into the location; 
changing an individual bit with an AND or OR will have no effect. 
ri Note that when reading bit 7 of the lER, it will always be presented 

as a 1, but could in fact be a 0. It takes an explicit write to bit 7 to 
insure its state. 

See location 37149 ($91 ID) for conditions that set the VIA IRQ 
flags. 
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The Kemal RS-232 routines test and set this byte extensively. 
The serial and tape routines, however, leave this byte as initialized 

The Kemal INITVIA* routine sets the lER so that only a RE- 
STORE key (CAl) interrupt is enabled. The bits and their settings are: 
Bit 7: Enable/disable control bit 

disable IFR bits corresponding to bits in this byte set to 1 

1 enable IFR bits corresponding to bits in this byte set to 1 

In each of the remaining bits, a indicates that the function is 
disabled, while a 1 signifies that the function is enabled. 
Bit 6: Timer 1 interrupt 
Bit 5: Timer 2 interrupt 
Bit 4: CBl interupt 
Bit 3: CB2 interrupt 
Bit 2: Shift register interrupt 
Bit 1: CAl (RESTORE key) interrupt 
Bit 0: CA2 interrupt 



$9I1F VIA1PA2* 

This is a mirror of port A I/O register at location 37137 ($9111), 
except that the CAl and CA2 control lines are not affected when 
using this port A reflection. This is described at location 37148 
($91 IC). 

Locafion Range: 37152-37167 ($9120-$9I2F) 

6522 Versatile Interface Adapter 2 

VIA 2 is used by the VIC-20 for keyboard scanning, jiffy inter- 
rupt generation, serial service request interrupt detection, tape I/O, 
and joystick joy 3 reading. 

When timing is being performed for the tape drive, the IRQ tim- 
ing is suspended, thereby causing the STOP key, and the updating 
of the BASIC variables TI and TI$, to be temporarily ignored. 

STOP key scannirig is implemented by leaving PB3 active, 
which is done by setting bit 3 to and all other bits to 1. When a 
test for the STOP key is called for, PAO is checked for a value of 0. 
The routine STOP is used to detect the STOP key and is vectored 
from location 808 ($328). The BASIC routine NEWSTT calls STOP 
after each BASIC statement processed during run mode. Location 
145 ($91) discusses the saved result of the keyboard STOP key test 
that senses other keys as a by-product. 

Unlike VIA 1, VIA 2 ports are dedicated to the keyboard scan 
function and only the CAl, CA2, CBl, and CB2 control lines are 
accessible to the user. These are available through the serial and tape 
ports. VIA 1 is the better choice for user control of VIA ports, unless 
you're thinking of attaching to the keyboard connector. 

Whereas VIA 1 presents a VIA IRQ to the 6502 as an NMI 
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' ' (Non-Maskable Interrupt) sigrial, VIA 2 IRQ use the 6502 IRQ line 

which may be masked by setting the proper flag in the processor 
r-[ status register (.P). See location 783 ($30F) for details of setting and 

i ! testing .P. 

p. The Second 6S22 VIA Chip's Registers 

n The 6522 VIA chip registers are actually located in the VIA 

chips themselves. No RAM corresponds to these VIA registers. When 
POKEing or PEEKing values, you are actually accessing the VIA 
chips themselves. Special rules for reading and writing bytes may 
sometimes apply because of this. 

Power-on/reset and the RUN/STOP-RESTORE keys cause 
these values to be reinitialized by the INITVIA* routine. The 
initialization value will be shown at each VIA 2 location. 

Schematic diagrams of the various VIC-20 ports and the VIA 
line connections to them are shown in the introduction to VIA 1. 
VIA 2 lines are included on the diagrams. However, the keyboard 
connector port is managed by VIA 2, and so is shown below in 
Table 6-5. 

Table 6-5. Keyboaid Connectoi Pins 

Port Fort VIA 

Pin /bit Line Use 

1 ground 

2 (KEY) 

3 (VIA1,CA1) RESTORE key 

4 +5 volts 

5 B7 PB7 column 7 of keyboard; also joy 3 on 

game port pin 4 

6 B6 PB6 column 6 of keyboard 

7 B5 PB5 column 5 of keyboard 

8 B4 PB4 column 4 of keyboard 

9 B3 PB3 column 3 of keyboard, also tape 

write on tape port E-5 left on for 

p_ STOP key scanning 

n 10 B2 PB2 column 2 of keyboard 

11 Bl PBl column 1 of keyboard 

12 BO PBO column of keyboard 
PI 13 A7 PA7 row 7 of keyboard 

14 A6 PA6 row 6 of keyboard 

15 A5 PAS row 5 of keyboard 
|~1 16 A4 PA4 row 4 of keyboard 
' ' 17 A3 PA3 row 3 of keyboard 

18 A2 PA2 row 2 of keyboard 

P- , 19 Al PAl row 1 of keyboard 

I 20 AO PAO row of keyboard 
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Refer to location 197 ($C5) for more information on the way the 
routine IRQ uses the keyboard matrix. The IRQ routine calls the 
SCNKEY routine, as you can also, to perform the keyboard scan. 
Location 145 ($91) STKEY discusses the saved result of the keyboard 
STOP key test that senses other keys as a by-product. 

37152 $9120 VIA2PB* 

Port B I/O register. 

This port is used for scanning the keyboard columns. 

Handshaking control lines CBl and CB2 are controlled by this 
port, and when reading or writing these bits, bits 4 and 3 of 37165 
($912D) are automatically reset. Location 37164 ($912C) is used to 
select the CBl and CB2 stahis. 

The INITVIA* routine sets this port to output mode in the data 
direction register at 37154 ($9122). No other routines change that 
setting. 

To scan a particular column, you need to turn off the bit 
corresponding to that column and turn on all the other bits. Refer to 
port A at location 37153 ($9121) for more information on the 
mechanics of keyboard column/row scanning. 

This byte normally contains 247 ($F7) (11110111 in binary), 
except when SCNKEY or UDTIM is examining the keyboard. 

The bits' functions are: 

Bit 7: Column 7 of keyboard; also joy 3 on game port pin 4 

Bit 6: Column 6 of keyboard 

Bit 5: Column 5 of keyboard 

Bit 4: Column 4 of keyboard 

Bit 3: Column 3 of keyboard; also tape write: tape port E-5 

Left on (0) for STOP key scanning. 

Bit 2: Column 2 of keyboard 

Bit 1: Column 1 of keyboard 

Bit 0: Column of keyboard 

To read the joystick joy 3 switch, you could use: 
POKE 37154,127 : REM set data direction register, 

: REM some keyboard keys ignored. 
J3=PEEK(37152) AND 128 : REM 0=on; l=off 
POKE 37154,255 : REM restore the data direction 



37153 $9121 

Port A I/O register. 

This port is used for keyboard row scanning. 

Handshaking control lines CAl and CA2 are managed by this 
port, and when reading or writing these bits, bits 1 and of 37165 
($912D) are automatically reset. Location 37166 ($912C) is used to 
select the CAl and CS2 status. 
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The INITVIA* routine sets this port to input mode in the data 
direction register at 37155 ($9123). No other routines change that 

n setting. 

• i A mirror port A register is located at 37167 ($912F) and can be 

used instead of this register when you don't want to reset CAl and 
CS2 by accessing the register. 

Here's what each bit of this location scans: 

Bit 7: Row 7 of keyboard 

Bit 6: Row 6 of keyboard 

Bit 5: Row 5 of keyboard 

Bit 4: Row 4 of keyboard 

Bit 3: Row 3 of keyboard 

Bit 2: Row 2 of keyboard 

Bit 1: Row 1 of keyboard 

Bit 0: Row of keyboard 

Scanning for keys pressed is a two-step process. First, a column 
of keys is selected by turning on all bits of port B and turning off the 
bit corresponding to the column to be examined. Column is nor- 
mally the first column scanned. Then by examining port A, the key 
pressed is detected by seeing which bit is set to 0. If no keys were 
pressed in that column, port A would contain 255 ($FF). The next 
column is selected and the row is again read from port A. 

No more than one key per column can be sensed at the same 
time. However, a key pressed on a different column can be detected, 
since all eight columns are examined consecutively. The SCNKEY 
routine performs this scanning of the keyboard, leaving the resulting 
value in location 203 ($CB). You may call this routine yourself. It is 
invoked automatically on every IRQ routine entry. The value in 203 
($CB) is stored as an index value into the keyboard decoding tables 
starting at NORMKEYS* 60510 ($EC5E). 

The key values placed in location 203 ($CB) are listed in loca- 
tion 197 ($C5). Refer to the table in that location for each key's 
value. 

The STOP key is represented by a code of 24 in this location. 
You need to disable the STOP key in a program to see this value. 
See the vector description at 808 ($328) for details of how to disable 
the STOP key. 

The SCNKEY routine is used to translate the values in location 
203 ($CB) into ASCII by picking up the nth value in the keyboard 
decoding tables at NORMKEYS* 60510 ($EC5E), where n is the con- 
tents of 203 ($CB). SHIFT, Commodore key, and CTRL key flags at 
location 653 ($28D) are also used to determine the table. The result- 
ing ASCII value is placed in the keyboard buffer at location 631 
($277). 

For STOP key testing purposes, the column in port B is always 
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left as 247 ($F7) so that a read of port A can quickly determine if 
PAO is 0. The subroutine to perform this test is STOP, which sets the 
zero flag in .P if the STOP key is pressed. Otherwise, it returns the 
value of port A in .A, which could be another key in column 3. 
Location 145 ($91) is used to save the results of the STOP routine 
returned accumulator. Every other key on the bottom row of the 
keyboard may be tested for in this location, without doing a GET in 
BASIC. 

Values in location 145 ($91) signify: 

255 ($FF) no key pressed 

254 ($FE) STOP key pressed, STOP routine will find and act on 

253 ($FD) left SHIFT key pressed 

251 ($FB) X key pressed 

247 ($F7) V key pressed 

239 ($EIO N key pressed 

223 ($DF) comma key pressed 

191 ($BF) slash key pressed 

127 ($7F) cursor up key pressed 

Table 6--8. Keyboard Scanning Using Port B and Port A 
of VMS 

ROW loaded from $9121 or $912F 

Bit name PA7 PA6 PAS PA4 PA3 PA2 PAl PAO 



Decimal 


127 


191 


223 


239 


247 


251 


253 


254 


Hex 


$7F 


$BF 


$DF 


$EF 


$F7 


$FB 


$FD 


$FE 


Binary 


0111 


1011 


1101 


1110 


nil 


1111 


1111 


nil 




1111 


1111 


1111 


1111 


0111 


1011 


1101 


1110 



COLUMN stored in $9120 
Bit Dec Hex Binary 



PB7 127 $7F 0111 1111 17 


HOME 


- 





8 


6 


4 


2 


PB6 191 $BF 1011 1111 f5 


t 


(£D 


o 


U 


T 


E 





PBS 223 $DF 1101 1111 f3 






K 


H 


F 


S 


Commo 


PB4 239 $EF 1110 1111 fl 


right 
SHIFT 




M 


B 


C 


Z 


space 


PB3 247 $F7 1111 0111 cursor 
down 


/ 


' 


N 


V 


X 


left 
SHIFT 


STOP 


PB2 251 $FB 1111 1011 cursor 

right 


'■ 


L 


J 


G 


D 


A 


CTRL 


PBl 253 $FD 1111 1101 RETURN 


* 


P 


I 


Y 


R 


W 





PBO 254 $FE 1111 1110 DELETE £ 



+ 9 



VIA2DDRB' 



$9122 

Data direction register for port B. 

Each of these eight bits corresponds to the same-numbered bit 
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in port B. When a bit in this location is set to 0, the corresponding 
port B bit is used for input. A bit set to 1 in this address indicates an 
output function in the port B related bit. Port B is located at 37152 
($9120). 

Power-on/reset and the RUN/STOP-RESTORE keys cause 
initialization to 255 ($FF), signifying all lines as output, by the 
INITVIA* routine. 

To read the joystick joy 3 switch, you could use the following 
routine: 

POKE 37154,127 : REM set data direction register 

: REM some keyboard keys ignored 
J3=PEEK(37152) AND 128 : REM 0=on; l=off 
POKE 37154,255 : REM restore the data direction 



$9123 VIA2DDRA 

Data direction register for port A. 

Each of the bits in this register has a corresponding bit in port 
A. When one of these bits is set to 0, the corresponding port A bit is 
used for input. Setting a bit in this location to 1 indicates an output 
function in the port A related bit. Port A is located at 37153 ($9121) 
and is also reflected at 37167 ($912F). 

Also see location 37163 ($912B) bit for port A latch enable bit. 
If input latching is disabled, any input directed port A bits will, at 
any time, show the current associated pin status of high or low. 
Latched mode will read data only when a transition on CAl line 
occurs. See location 37164 ($912C). 

Power-on/reset and the RUN/STOP-RESTORE keys cause 
initialization to 00 ($00) by the INITVIA* routine. 

37156 $9124 VIA2T1CL* 

Timer 1 least significant byte (LSB) of count. 

This timer is used to generate the IRQ 60 times per second and 
to time the tape drive read and write functions. 

Timer 1 is initialized to 17033 ($4289) by the VIA initialization 
routine. See location 37159 ($9127) for tiie method used to deter- 
mine the value placed in timers which will obtain the time interval 
required. 

When setting this byte, the timer 1 latch at 37142 ($9126) is set 
with the desired value rather than this location. See location 37143 
($9117) for the sequence of loading timer 1 and the resulting 6522 
actions. You can also refer to location 37159 ($9127) for the tech- 
nique used to calculate the value to place in timer 1 to accomplish 
the desired interval before an interrupt occurs. 
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37157 $9125 VIA2T1CH* 

Timer 1 most significant byte (MSB) of count. 

This timer is used to generate the IRQ 60 times per second and | I 

to time the tape drive read and write functions. 

The tape read and write routines replace the value used here for 

the IRQ and the vector for the IRQ routine, and use timers 1 and 2 | | 

for timing of the tape function. This is why time is lost in the BASIC 
variable TI and TI$ during tape functions. The timer 1 jiffy IRQ 
value, along with the associated vector, is replaced by the tape 
routines when they have finished their task. 

This byte is used with the LSB of the count stored in the timer 1 
LSB byte at location 37156 ($9124). See the description and ref- 
erences at that location. The timer may be started again without an 
interrupt (retriggered) by storing a new value in this location. 

Setting this byte of timer 1 starts the timer running. See location 
37143 ($9117) for a description of this effect. You'll need to adjust 
the addresses mentioned in that location by adding 16 to have the 
correct locations for VIA 2. 

37158 $9126 V1A2T1LL* 

Timer 1 low order (LSB) latch byte. 

Timer 1 is used to generate the IRQ 60 times a second and to 
time the tape drive read and write functions. 

The calculations used to determine the value for timer 1 are 
explored at location 37159 ($9127). 

See the description of VIA 1 timer 1 latches at 37143 ($9117) for 
details of how the timer latches are associated with the timer 1 
counts. Note the differences in addresses for VIA 1 and 2 locations. 

37159 $9127 VIA2T1HL* 

Timer 1 high order (MSB) latch byte. 

Timer 1 is initialized to 17033 ($4289) by the VIA initialization 
routine. 

The tape read and write routines replace the value used here for 
the IRQ and the vector for the IRQ routine, and use timers 1 and 2 [_J 

for timing of the tape function, restoring the timer 1 value and the 
IRQ vector when done. 

In the article "Slow LIST on the VIC-20," by Ken Bowd, in the \1 

June 1983 issue of COMPUTE!, the techniques described for slowing '— ' 

the LIST output to the screen are actually modifying the VIA 2 timer 
1 located at this location. Bowd's article described the modification r~i 

of location 37879 ($93F7), which is actually a reflection of this VIA LJ 

timer byte, caused by the address decoding that sees the VIA reg- 
isters when an empty block of RAM/ROM is accessed. 
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'■ ' The idea explored in the article involved changing the IRQ timer 

MSB latch so that the BASIC LIST command is interrupted by the 
r-1 IRQ routine often enough that LIST output to the screen is slowed, 

■ i making the program easier to read. By using POKE 37159,0, the 

cursor becomes a blur because it is flashing so rapidly. When a LIST 
_. is done under this condition, it is slowed considerably. 

M Holding down or locking the SHIFT key causes the lines to be 

displayed at the rate of one line every one and one-half seconds. In 
addition, pressing the CTRL key with SHIFT down acts as a pause 
key. The CTRL key by itself will slow the LIST to one line every 13 
seconds. The cursor control keys are a little difficult to control with 
this technique because they move the cursor so quickly. The STOP 
key can still be used to break the LIST output, the printer still prints 
at the normal rate if LIST is directed to it with a CMD statement, 
and RUN/STOP-RESTORE will reset the VIA timer latch byte back 
to its original value of 66 ($42). 

The jiffy clock is obviously not accurate if the IRQ rate is modi- 
fied from its original value. This technique of changing the VIA 2 
timer 1 high order latch in order to speed up or slow down the IRQ 
interrupt can be used in other applications as well. The slowing 
down of the Super Expander cartridge in order to customize its 
drawing rate for games was suggested in the article. The lower the 
number put into this location, the more often the IRQ interrupts are 
called, while a number higher than the original value of 66 causes 
the interrupts to happen more slowly, which will speed things up. 
The cursor blink rate, which speeds up as the value is lowered, also 
indicates the rate of the keyboard scan. When this location's value is 
changed to 255, the cursor and keyboard keys react at about one- 
quarter of their normal rate. 

Keep in mind that a free-running timer is reloaded from the 
latches once the interrupt has been flagged in the interrupt flag reg- 
ister. By modifying the latch LSB/MSB, you are changing more than 
just the current time interval value. 

The LSB and MSB counters and latches are related to each other 
and used in conjunction to accomplish the desired timing/counting 
r~] function. See location 37143 ($9117) for a description of the relation- 

' ' ships. Make sure you adjust the addresses mentioned there by add- 

ing 16 for the corresponding VIA 2 locations. 
P-j The timers in the VIAs can be used to time an interval between 

i I about 225 microseconds and 64 milliseconds. The minimum of about 

225 microseconds is due to the overhead involved in processing the 

interrupt request presented when the timer expires. This range of 

M time intervals may be extended by using a location in memory to 

count the number of interrupts that have occurred. In a BASIC pro- 
gram, the variables TI and TI$ access the jiffy clock at location 160 
r^ ($A0). This jiffy clock is updated by the IRQ routine, and is, in 
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essence, a software clock that counts the timer 1 expirations. LJ 

The 6560 VIC chip includes a clock generator circuit that 
receives the input from a 14.31818 megahertz (million cycles per sec- r- - 

ond) two-phase oscillator clock. In Europe, the PAL standard os- 1_J 

dilator clock is 4.436187 megahertz. This frequency is used to 
generate the correct TV picture frequency. In the USA, this 14.31818 __ 

frequency is divided by the 6560 ViC chip, producing a 1.02272 I j 

megahertz clock line (1.108224 megahertz for PAL European) for use 
as a +5 volt clock for the 6502 and 6522 chips. 

To calculate the values for the LSB and MSB of timer 1 or 2 in 
either VIA, so that you can obtain the desired time interval, use the 
formula: 

(microseconds per interrupt * 1.02272) —2 

Let's go through an example of an interrupt every millisecond. 
One millisecond equals 1000 microseconds, so our formula for this 
example is: 

(1000 * 1.02272)-2 

which equals 1021 if we round off. The MSB value would be the 
integer value of 1021/256, or 3. The LSB value is 1021 -(256*3), 
which equals 253. In hex, our LSB/MSB calculated values are ($FD/ 
$03). 

The value used in timer 1 to cause the 60-per-second IRQ is 
17033 ($4289), expressed in LSB/MSB as 137/66 ($89/$42). We can 
determine the amount of time this represents by reversing the for- 
mula given, arriving at: 

(17033 + 2)/1.02272 = microseconds per interrupt 

This is 16,656 microseconds, 16.6 milliseconds, or .0166 seconds. 

The maximum value that the LSB/MSB can hold is $FFFF. We 
can determine the amount of time this represents by again reversing 
the formula, arriving at: 

(65,535 + 2)/ 1.02272 = microseconds per interrupt 

This equals 64,081 microseconds, 64 milliseconds, or .064 seconds. 

Keep in mind that a free-running timer is reloaded from the ; - 

latches once the interrupt has been flagged in the interrupt flag reg- Li 

ister. By modifying the latch LSB/MSB, you are changing more than 
just the current time interval value. 

The four VIA timers can be used to "wake up" a routine after a (_J 

certain amount of time, or to time external events such as tape 

movement, or even how long the lawn sprinklers have been on. You 

may also want to use a VIA timer as a stopwatch to see how much I | 

time an event takes, or as a counter of events. Timer 2 can count — 

pulses coming in on PB6, and a timer 1 expiration can send a pulse 
out on PB7. 
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The auxiliary control register at location 37136 ($912B) is used 
to select the interrupt options associated with the timers. See that 

^ location for the available options, and refer to location 37161 ($9129) 

for a further description of setting the timers. The interrupt enable 
register at 37166 ($912E) is used to select whether an interrupt is 

ri generated for an expiration of timers 1 and 2. Location 37166 

($912E) describes in detail the use of this register. The IRQ vector at 
788 ($314) can be changed to point to your routine to count the 
interrupts that have occurred and do any processing you wish done. 

37160 $9128 VIA2T2GL* 

Timer 2 low order (LSB) counter and LSB latch. 

This timer is used by the Kemal for the timing involved with 
detecting serial device timeouts, such as failure to respond to a com- 
mand. It's also used with timer li:ape read/ write timing. 

Putting a value here initializes the latch component, while read- 
ing this location obtains the value stored here and resets the 37165 
($912D) interrupt flag. 

See the further description of this byte at location 37161 
($9129). 

37161 $9129 VlA2T2Cif 

Timer 2 high order (MSB) counter and MSB latch. 

Timer 2 is used by the Kemal for the timing involved with 
detecting serial device timeouts — for instance, failure to respond to a 
command — and with timer 1 tape read/write timing. 

Bit 5 of location 37163 ($912B) selects the mode of timer 2 as 
either an interval timer or a PB6 pulse counter. Bit 5 of location 
37165 ($912D) is the interrupt flag, and bit 5 of location 37166 
($912E) is used to enable the interrupt generated by timer 2. 

Putting a value here initializes the latch component, stores the 
LSB latch into the LSB counter component, dears the interrupt flag 
in location 37165 ($912D), resets the IRQ line, and starts the timer. 
This occurs whether timer 2 is already active or not, and thus can 
retrigger it. Reading this location obtains the value stored here. 

In order to use this as an interval timer, you need to: 

• Set the enable flag in bit 5 of 37165 ($912D), if desired. 

• Set the mode for timer 2 in 37163 ($912B). 

• Store the desired value in the LSB. 

• Store the MSB of the timer period in 37161 ($9129). This 
begins the countdown of timer 2. Before the countdovm starts, how- 
ever, the VIA copies the low order latch into the low order counter, 
and sets the flag register 37165 ($912D) bit 5 to 0. 

• The counter in timer 2 is counted down at the rate of the sys- 
tem clock. See the description of the clock rate at location 37159 

($9127). 

169 



n 

n 



n 



u 

u 

• When the count in timer 2's LSB and MSB reaches 0, the flag 
in 37165 ($912D) bit 5 is set to 1 and an IRQ is signaled to the 6502 

if the bits in 37166 ($912E) allow it. f ] 

• The counter in timer 2 rolls over and starts counting down — 
from 65535 ($FFFF) so an interrupt routine can tell how long ago the 
interrupt occurred. i — , 

In order to use timer 2 as a PB6 pulse countdown counter, you 
would: 

• Set the enable flag in bit 5 of 37165 ($912D), if desired. 

• Set the mode for timer 2 in 37163 ($912B). 

• Set the data direction register for input on PB6. 

• Determine the number of pulses to be counted. Timer 2 counts 
down from this value and sets the interrupt flag when the count 
rolls over from to 65535. The IRQ is signaled if the interrupt for 
this timer is enabled at location 37166 ($912E). 

• Store the LSB of the count desired. 

• Store the MSB of the count desired. This starts the count. 

• When a negative pulse is detected on PB6, the counter will be 
decremented. 

• The interrupt bit can be cleared by reading the LSB of the 
count or the countdown can be retriggered by writing to the MSB. 

Timer 2 can also be used as a shift clock for the shift register at 
37146 ($911 A). See the description of that location. 

37162 $912A VIA2SR'' 

Shift register for parallel/serial conversion. 

The Kemal does not use this shift register. 

The shift register provides a mechanism to convert between 
serial and parallel data and can be used for communicating with 
devices on the user port of the VIC-20. This VIA does not have a 
connection from CBl and CB2 to the serial port, so this shift register 
may be used for the user port only. 

Serial I/O is slower but simpler than parallel I/O. A 4040 disk 
drive on an IEEE-488 card installed in the VIC-20 parallel user port 
is at least eight times faster than the serial 1540/1541 disk drive. If 

The shift register can also be used to perform variable frequency 
pulsing of an output line. 

Bit 2 of both the interrupt enable register and the interrupt flag [ j 

register corresponds to the shift register. ' — ' 

Bits four through two of the auxiliary control register at 37163 
($912B) are used to select the shift register mode. r^ 

This register shifts out bit 7 onto the CB2 line. Storing a value in I i 

the register starts the shift out. When used for input, the bit from 

CB2 is put into bit 0. — 

Reading or writing the shift register starts the shift in. To shift in ! j 
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the next byte of data, you need to read the value shifted into the 
register. Bits are shifted and stored/sent whenever a pulse is 
n detected on line CBl. The shift register is shifted one bit to the left 

' ' afterward. This pulse can be generated in several ways. 

An external clock, for instance a disk drive, can pulse the CBl 
f-n line up to 511.36 kHz. The system clock can also be converted to a 

i value of up to 511.36 kHz and used to clock CBl. The LSB of timer 

2 can be used as a delay between CBl pulses. A shift counter counts 
the CBl pulses and sets the interrupt flag after the eighth shift. In 
free-running mode, the pulse counter is not used, and the bits cir- 
culate within the shift register. 

See the VIC-20 Programmer's Reference Guide, page 232, for 
details of using the shift register to obtain sound from the user port. 

37163 $9i2B VIA2ACR* 64 

Auxiliary control register. 

The auxiliary control register is used to control the options asso- 
ciated with timer 1, timer 2, the shift register, and the way that port 
A and B are latched with data. 

The Kemal initializes this register to 64 ($40) at power-on/reset 
or when the RUN/STOP-RESTORE keys are pressed. The bit values 
marked with an asterisk (*) are those initialized when the computer 
is first turned on, or after the RUN/STOP-RESTORE keys are 
pressed. 

The bit values and these values' meanings in this register are: 

Bits 7-6: Timer 1 options. (See the description of timer 1 starting at 
location 37156, $9124.) 

00 single interval mode; no PB7 output pulses 
*01 free running mode; no PB7 output pulses 

10 single interval mode; PB7 negative pulses 

11 free running; PB7 square wave, invert of last pulse 

Bit 5: Timer 2 options. (See the description of timer 2 starting at 
location 37160, $9128.) 
*0 single interval timing 

1 countdown incoming PB6 pulses 
Bits 4-2: Shift register options. (See the description of the shift reg- 
ister starHng at location 37162, $912A.) 

*000 shift register disabled 

001 input data on line CB2 to shift register bit using timer 2 
LSB; output clock pulses on line CBl. 

010 input data on line CB2 to shift register bit using system 
clock; output clock pulses on line CBl. 

Oil output data on line CB2 from shift register bit 7 using timer 
2 LSB; recirculate bit 7 to bit 0, free running. CB2 can be connected 
to an amplifier for sound. 
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100 output data on line CB2 from shift register bit 7 using timer 

2 LSB as delay dock. 

110 output data on line CB2 from shift register bit 7 using sys- f ] 
tem clock. ' — ' 

111 output data on line CB2 from shift register bit 7 using the 

external clock input on CBl. r -. 

Bit 1: Port B latch enable options. Port B is located at 37152 ($9120). U 

*0 Port B to reflect changing values on pins. 
1 Port in latch mode. If used for input, port B will show the sta- 
tus of the lines when a CBl interrupt occurs. Otherwise, the chang- 
ing status of the lines is not reflected in the port. 
Bit 0: Port A latch enable options. Port A is located at 37153 ($9121) 
and 37167 ($912F). 

*0 Port A to reflect changing values on pins. 
1 Port in latch mode. If used for input, port A will show the sta- 
tus of the lines when a CAl interrupt occurs. Otherwise, the chang- 
ing status of the lines is not reflected in the port. 

37164 $9I2C VIA2PGR* 222 

Peripheral control register for handshaking. 

This byte contains the options for CAl, CA2, CBl, and CB2 
lines. The mirror of port A at location 37167 ($912F) can be used 
instead of port A, if you do not want to change the related control 
lines CAl and CA2. 

The Kernal serial device routines modify this location to select 
the handshaking with the current serial device. 

The INITVIA* Kernal routine sets this byte (as marked with an * 
below) at power-on/reset or when the RUN/STOP-RESTORE keys 
are pressed. 

Each bit and its possible values are: 

Bits 7-5: CB2 line control. CB2 is used for serial data out, since it's 
attached to the serial port pin 5, as well as for interrupt input, device 
output, or shift register input or output, in which case these bits are 
ignored. The interrupt flag register (IFR) is at 37165 ($912D). Bit 3 of 
the IFR is used for a CB2 interrupt flag. r \ 

000 Input mode L- ' 
Set IFR bit 3 on a high to low transition of CB2 and clear IFR bit 

3 when port B is read or written to. r - 

001 Input mode Li 
Set IFR bit 3 on a high to low transition of CB2, but do not clear 

IFR bit 3 when port B is read or written to. IFR bit 3 is cleared by 

writing a 1 to it. j [ 

010 Input mode 

Set IFR bit 3 on a low to high transition of CB2 and clear IFR bit 

3 when port B is read or written to. j j 
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i oil Input mode 

Set IFR bit 3 on a low to high transition of CB2, but do not clear 
^_ IFR bit 3 when port B is read or written to. IFR bit 3 is cleared by 

! writing a 1 to it. 

100 output mode (handshake) 

CB2 line will be set low when port B is written to, and it will be 
Pl set high when a CBl transition occurs. 

101 Output mode (pulse) 

CB2 line will be set low for one cycle when port B is written to. 
*110 Output mode (manual) 

CB2 line to be held low. 

Ill Output mode (manual) 

CB2 line to be held high. 
Bit 4: CBl line control. CBl is used to accept an interrupt for 
received data, as a transition of voltage control line, and as an out- 
put for the shift register clocking pulses. This control line is attached 
to the serial port service request in pin. The fourth bit of the IFR 
(Interrupt Flag Register) at location 37165 ($912D) is used to flag a 
CBl interrupt. 

IFR bit 4 is set on a high to low transition of CBl. 
*1 IFR bit 4 is set on a low to high transition of CBl. 
Bits 3-1: CA2 line control. CA2 is used for the serial clock output 
line and is attached to serial port pin 4. By VIA design, it could be 
used for interrupt input or device output. Bit of the IFR at location 
37149 ($911D) is used to flag a CBl interrupt. 

000 Input mode 

Set IFR bit on a high to low transition of CA2, and clear this 
bit if port A is read or written to. 

001 Input mode 

Set IFR bit on a high to low transition of CA2, but do not 
clear it if port A is read or written to. IFR bit is cleared by writing 
a 1 to it. 

010 Input mode 

Set IFR bit on a low to high transition of CA2, and clear the 
bit if port A is read or written to. 
p-l Oil Input mode 

I Set IFR bit on a low to high transition of CA2, but do not 

clear it if port A is read or written to. IFR bit is cleared by writing 
a 1 to it. 

100 Output mode (handshake) 
Set CA2 low when port A is read or written to. 

101 Output mode (pulse) 

Output a one cycle pulse of following a read or write of port A. 
110 Output mode (manual) 
CA2 is held low. 

*111 Output mode (manual) 
CA2 is held high. 
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Bit 0: CAl line control. This bit is used for tape reading in the VIC- ' — ' 

20. It is attached to the tape port pin D-4. 

A CAl line can normally be used to generate an interrupt on a - - 

high to low, or low to high transition of CAl. Bit 1 of the IFR at i_J 

location 37149 ($91 ID) is used to flag a CAl interrupt. 

The expansion port also has a line (pin W) that connects to the 
6502 NMI pin. [J 

*0 IFR bit 4 is set on a high to low transition of CBl. 

1 IFR bit 4 is set on a low to high transition of CBl. 

37165 $912D VIA2IFR* 

Interrupt flag register. 

This register is used to generate a VIA IRQ to the 6502 IRQ line 
when any of bits 1-6 are on and the corresponding bit in 37166 
($912E), the lER (Interrupt Enable Register) is set to 1, and bit 7 of 
the lER is also on. 

This is accomplished by the VIA tying bit 7 of this location to 
the 6502 IRQ line. Bit 7 is turned on when any other bit in this byte 
is flagged, or turned on. Note when reading bit 7 of the lER that it 
will always be presented as a 1, but could in fact be a 0. It takes an 
explicit write to bit 7 to insure its state. 

The conditions that set and clear the interrupt flag bits are 
received here and were discussed at location 37164 ($912C), but you 
may also set or reset a flag by simply setting the appropriate bit in 
this location. 

The interrupt flags in this register have the following meanings: 
Bit 7: IRQ occurred 

This bit is set by any enabled interrupt flag bit being set. By 
storing a here, you clear all interrupts. It is also reset if all other 
interrupt flags are currently O's. 
Bit 6: Timer 1 interrupt 

This bit is set by an expiration of timer 1, and reset when a read 
of timer 1 LSB or a write of timer 1 MSB takes place. 
Bit 5: Timer 2 interrupt 

Set by expiration of timer 2, this bit is reset when a read of 
timer 2's LSB or a write of timer 2's MSB occurs. 
Bit 4: CBl transition interrupt 

This bit is set by the transition of the CBl line and reset by a 
read or write on port B. T "/ 

Bit 3: CB2 transition interrupt ^ 

Set by the transition of the CB2 line, bit 3 is reset by a read or 
write on port B. r ", 
Bit 2: Shift register interrupt i j 

This bit is set by eight shifts of the shift register and reset by a 
read or write to the shift register 
Bit 1: CAl transition interrupt {_] 
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Bit 1 is set by a transition of the CAl line, while it is reset by a 

read or write of port A. 
^ Bit 0: CA2 transition interrupt 

'' ' This bit is set by a transition of the CA2 line and reset by a read 

or write of port A. 



37166 $9I2E VIA2IEr 

Interrupt enable register (lER). 

This byte is used to indicate which interrupt flags in location 
37165 ($912D) (IFR) should cause a VIA IRQ to the 6502 IRQ line. 
The interrupt bits in the IFR are set and reset regardless of the pro- 
grammer's wish to ignore or detect a particular condition. This byte 
provides you with a means to enable/disable the generation of the 
VIA IRQ. 

The Kemal serial and tape routines set this byte extensively to 
accomplish their appointed tasks. 

The Kemal INITVIA* routine sets the lER so that only a timer 
one (IRQ) interrupt is enabled. Its value at initialization is then 192 
($C0). 

Each bit in this byte corresponds to the same-numbered bit in 
the IFR, except for bit 7 which is a control bit. If bit 7 is a 1, all the 
following bits in this byte that contain a 1 enable the corresponding 
bit in the IFR. For example, if this byte contained binary 1010 0101, 
then interrupt bits 5, 2, and of the IFR would be enabled and 
would cause a VIA IRQ if those IFR bits were turned on. 

If bit 7 is set to 0, the remaining bits in this byte that are set to 

indicate those corresponding bits in the IFR that are to be disabled. 
Binary 0101 1010 placed into this byte would cause bits 6, 4, 3, and 

1 to be disabled in the IFR. 

In practice, you would disable the bits of the IFR that you wish 
to ignore, then enable those that you wish to use. 

A value of binary 0111 1111 ($7F) would disable all interrupts, 
while binary 1111 1111 ($FF) would enable all. 

The whole byte must be set at once by POKEing a value into 
this location. Changing a particular bit individually with an AND or 
OR will have no effect. Note that when reading bit 7 of the lER, it 
will always be presented as a 1, but could in fact be a 0. It takes an 
explicit write to bit 7 to insure its state. 

See location 37165 ($912D) for conditions that set the VIA IRQ 
flags. 

The individual bits of this register, along with each bit's func- 
tion, are: 
Bit 7: Enable/disable control bit 

Disable IFR bits corresponding to 1 bits in this byte. 
*1 Enable IFR bits corresponding to 1 bits in this byte. 
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Bit 6: Timer 1 interrupt * — ' 

disabled 

*1 enabled r -, 
Bit 5: Timer 2 interrupt ! I 

The remaining bits of this byte are all initialized at 0, or set as 
disabled. A 1 in any of the following bits enables that function. — 

Bit 4: CBl interrupt [J 

Bit 3: CB2 interrupt 
Bit 2: Shift register interrupt 
Bit 1: CAl (tape I/O) interrupt 
Bit 0: CA2 interrupt 

37167 $912F VIA2PA2* 

This register is a mirror of port A I/O register at 37153 ($9121), 
except that the CAl and CA2 control lines are not affected when 
you use this reflection. 
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Location Range: 37188-37887 ($813e-$83FF) 

Unused Input/Output Expansion Block 

This block of 719 bytes can be used for future expansion RAM/ 
ROM space. 

This area of the VIC-20 contains apparent reflections of the VIA 
chip registers. These reflections are not reliable and should not be 
used. This area is not on RAM or ROM, and it's only because of the 
address decoding scheme used that VIA chip registers even seem to 
be reflected here. This area really is available for future expansion 
and should not be used in the absence of that expansion. 

You're really accessing the VIA chip registers when POKEing 
here, and a PEEK to this area .has a good chance of returning 
incorrect values. Exhaustive testing with this area has proven its use 
to be extremely unreliable and it should be avoided. You can use the 
VIA chip registers directly and avoid problems. 

Location Range: 37888-38aU ($9400-$97FF) 

Screen Color Maps 

37888-38399 $9480-$95IT GOLORMAPS' 

(handy location) 
Screen color map (8K+ expanded VIC-20). 

Bits 4-7 = not there 

Bit 3 = multicolor if set to 1 or normal if set to 

Bits 0-2 = foreground color value 0-7 

The VIC-20 contains two RAM color maps, the first at this loca- 
tion and the second at location 38400-38911 ($9600-$97FF). Both 
are used in exactly the same way. Which map is to be used is based 
on the amount of expansion memory added to the VIC-20 and is 

n resolved during the power-on/reset routines. If the VIC-20 is 

unexpanded or has only a 3K expansion, the color map at 38400 
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($9600) is used. Otherwise, this color map is selected. 

Locatiort 36866 ($9002) can be examined to see which color map 
is currently being used: If bit 7 is off, the color map used starts at i j 

location 37888; otherwise, it starts at 38400. To see which color map 
(CM) is used, you can enter the following line: _ 

CM=37888+(4*(PEEK(36866) AND 128)) [J 

where CM is the beginning of the color map selected. 

If you redefine the default screen map size, location, bitmap the 
screen, or define alternate screens, your use of the color map will 
need to be adjusted to correspond. See location 36869 ($9005) and 
Appendix E for details of those color map adjustments. 

Bits 3-1. Each color map is used by the 6560 VIC chip as a group of 
506 bytes, ignoring the remaining six bytes in this area. In this 506 
byte-block, each byte's bits 2-0 contain a foreground color number 
that is used to color any pixels that are turned on in that correspond- 
ing position of the screen. The background color selected (see loca- 
tion 36879, $900F, VIC chip register) is used to color the pb<els that 
are turned off in the same character position. 
Foreground color codes on the VIC are: 
Black 
White 1 
Red 2 
Cyan 3 
Purple 4 
Green 5 
Blue 6 
Yellow 7 

The inverse color bit at location 36879 ($900F) can be used to 
reverse the foreground and background colors, making all the 
characters the background color, and the area behind them colored 
by the color map contents. 

When double-sized characters (8x16) are selected by setting the 
bit at location 36867 ($9003), each position of the color map will 
correspond to a double-sized character. In this case, the color map li 

need be only 253 characters long. 

Bit 3 of the color map byte indicates whether the character is to 
be displayed in normal high-resolution mode (if the bit is 0) or in j , 

multicolor mode (if the bit is set to 1). If multicolor mode is selected uJ 

for a character, the ones and zeros in that character's eight-byte pixel 
map determine the colors used. .- - 

Every bit-pair in the pixel map for that character represents a [_J 

color code to be used, not the actual color number. Take a look at 
Figure 7-1 for an example. 

Multicolor and normal high resolution may both be used on the j | 
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screen at the same time. Location 32768 ($8000) describes the pixel 
maps of characters. 

Figure 7-1. MulHcolor Bit Settings 



Bits Color chosen 

00 BackGround color 

01 BOrder color 

10 ForeGround color 

11 Auxiliary color 



Location set 

36879 
36879 
Color Map 
36878 



Bit number 



Example 
PIXEL MAP 
11 11 11 11 
01 00 00 11 
01 00 00 11 
01 00 00 11 
01 10 10 11 
01 10 10 11 
01 10 10 11 
01 01 01 11 
76 54 32 10 



COLORS 

AU AU AU AU 
BO BG BG AU 
BO BG BG AU 
BO BG BG AU 
BO FG FG AU 
BO FG FG AU 
BO FG FG AU 
BO BO BO AU 
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See location 36879 ($900F) for a chart for background and bor- 
der colors, and 36878 ($900E) for the valid auxiliary colors. 

Normally, you would choose the multicolor mode only when 
you have defined your own custom character set. See 36869 ($9005). 

By using the multicolor mode, half the possible character-width 
resolution is lost because there are only four double bits across in 
each row of the character, although it is still eight bits high. But the 
color effects possible can create the illusion of a greater resolution. 

The RAM chip that the color maps are located in is a four bit by 
IK RAM chip. This means that each byte is actually made up of only 
the four low-order bits. The four high-order bits of each byte only 
appear to be present and are not usable in any way. 

See the screen map description at location 4096 ($1000) for for- 
mulas that you can use to calculate the byte of the color map that 
corresponds to a particular byte or bit in the screen map. 

The foreground color code is kept in location 646 ($286) and can 
be either placed there directly or selected by the CTRL key and one 
of the color keys. After the VIC-20 finishes power-on/reset, the fore- 
ground color has been set to blue, or color code 6. When you type a 
character on the keyboard, or PRINT it from a BASIC program, the 
Kernal causes the color code in 646 ($286) to be placed at the appro- 
priate color map location for the character's screen position. 

If all the color codes are left as set by the VIC-20, a blue charac- 
ter will appear on a white background. When you clear the screen 
with the CLR key, the screen is filled with spaces and the color map 
set to all white. These white color codes placed in the color map by 
the Kernal when clearing the screen have little effect. This is because 
the Kernal also fills the screen map with the space character which, 
because it has no pixels turned on, causes the entire screen to be the 
background color that you selected. 
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If you have selected a background color other than white and 
now place a character in the screen map, it will display in white on 
your selected background color, unless you also place a color code in 
the corresponding color map location. If you select a foreground 
color that is the same as the background color, the characters typed 
will be on the screen, but you won't be able to see them. This can be 
a handy trick at times. For instance, you could make a whole screen 
of information suddeiily appear by filling the color map with a 
contrasting foreground color code. 

Other locations related to the screen maps are: 
201 ($C9) Current logical line, column of cursor. A summation of the 
page 0/1 locations used by the Kernal screen editor and other 
routines is also included at this location. 
209 ($D1) Current screen map line 
211 ($D3) Column number that the cursor is on 
217 ($D9) Screen line link table 
243 ($F3) Pointer to start of line in color RAM 
243 ($F3) Address of the current line in color map 

647 ($287) Original color under cursor 

648 ($288) Screen map page number 

780 ($30C) Plotting and color setting example 

The routine COLORSET* uses the table COLORTBL* to find the 
appropriate color code to store in this location when the CTRL and 
color keys are pressed. 

38400-38911 $9600-$97FF 

Screen color map (unexpanded or 3K expanded VIC-20), 

Please see location 37888-38399 ($9400-$95FF) for a complete 
description of the use of both VIC-20 color maps. 

Location Range: 38912-39935 ($9890-$9BFF) 

Unused Input/Output Expansion Block 2 

This 4096-byte area, which can be used for future RAM or ROM 
expansion of the VIC-20, contains apparent reflections of other areas. 
These reflections are not reliable and should not be used. This area 
is available for future expansion and should not be used in the 
absence of that expansion. 

Location Range: 39936-40959 (SOCOO-SOFFF) 

Unused Input/Output Expansion Block 3 

A 4096-byte area, this contains reflections of other areas. These 
reflections are not reliable and should not be used. In the absence of 
any expansion in this block, this should not be used. 
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^ Location Range: 40960-49151 ($A900-$BFFF) 

8K Expansion Block 4 

40900-40151 SAOOO-SBFFF RAMBLK4* 

8K RAM expansion block 4. 

r^ This block is primarily used for autostart ROM cartridges such 

as games and other cartridge-based software. However, it may also 
be used for user RAM expansion, even though BASIC will never see 
this expansion since it's not contiguous with other RAM. The screen 
map and character map should not be placed in expansion RAM. 
The ROM or RAM at this location of memory is not required to be 
autostarted. The following items must be present to activate the 
autostart code in the Kemal: 
40960 ($A000) Vector: power-on/reset routines 
40962 ($A002) Vector: NMI (RESTORE key) routines 
40964 ($A004) Data: $41 30 C3 C2 CD 
A C B M 

with the high order bit on in the last three characters. Since the VIC- 
20 hasn't finished its initialization routines when the cartridge is 
autostarted, the following routines should be JSRed to: 

$FD8D RAM test 

$FD52 set vectors 

$FDF9 initialize I/O, CLI 

$E518 initialize screen 

A BASIC program can be in the ROM cartridge. An ML routine 

is used to initialize BASIC, modify the pointer to the beginning of 

the ROM BASIC program (43, $2B), and place RUN in the keyboard 

buffer. 

See the article "RAM/ROM on the VIC for $20," in the Decem- 
ber 1982 issue of Commander for a description of how to modify 

RAM to appear as ROM when needed. 

At power-on/reset, the START routine at location 64802 

($FD22) initializes the stack pointer, disables interrupts, and calls the 
n CHKAUTO* routine to check for an autostart ROM. If the AOCBM 

characters were found by that routine, a JMP ($A000) is performed, 

starting the ROM software. 
P^ The NMI routine will also check for an autostart ROM if the RE- 

' ^ STORE key has been pressed and will JMP ($A002) if the AOCBM 

characters are found. 
j—^ Turn the Commodore 8K and 16K expansion boards' DIP switch 

' \ 1 on for this block. 
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BASIC ROM 



Locatton Range: 49152-57343 (SCOOO-SDFFF) 

8K BASIC ROM 

This area contains the routines that comprise the BASIC inter- 
preter. BASIC is an integral part of the VIC-20 and is started and 
given control automatically at power-on/reset unless an autostart 
cartridge is plugged in. When LOAD is entered from the keyboard, it 
is BASIC that calls for this action to be performed by the Kemal. To 
allow ML programs to run in the VIC-20, BASIC is inevitably used 
to modify its ow^n range of memory and to load the ML instructions. 

Even if a machine language monitor is used, SYS (a BASIC 
word) is used to start the monitor. Since BASIC is always present in 
the VIC-20, its routines for numeric and string manipulation, 
mathematical functions, and I/O can be used to save you from hav- 
ing to redesign the same procedures, or at the very least can serve as 
a model for your own ML routines. 

If you're comparing the VIC-20 version of BASIC to PET BASIC, 
look at the PET's BASIC 2.0. The low memory work areas are a bit 
different, but the BASIC routines are quite similar in purpose and 
location. However, BASIC 2.0 does not have the serial, color, sound, 
and RS-232 routines that VIC-20 BASIC contains. The BASIC in the 
Commodore 64 is functionally identical to that in the VIC-20, 
although split into two sections. 

The differences between the two machines are most noticeable 
in the Kemal rather than BASIC. BASIC 4.0 for the PET includes 
disk commands not in VIC-20 BASIC, and PET BASIC 1.0 has a dif- 
ferent low memory pointer structure. BASIC 1.0 allows spaces within 
a keyword (such as IN PUT), while BASIC 2.0 does not. 

As you become more familiar with the internal structure of the 
VIC-20, you'll become adept at translating the bulk of material pub- 
lished for the PET into its equivalent on the VIC-20. Programming 
the PET/CBM, by Raeto Collin West, published by COMPUTE! 
Books in 1982, is a storehouse of PET/CBM information. Not for the 
beginner, this is perhaps the most complete volume of information 
available for Commodore products. 

BASIC is actually longer than 8K and spills over into the next 
8K ROM where the Kemal routines are located. 

In examining the routines in BASIC, be aware that any routine 
can be entered or jumped out of at virtually any point. The routine 
descriptions below are individualized by the entry and exit points 
that are most often utilized. A routine to perform a given function 
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may in fact be entered at a point that causes what is almost a dif- 
ferent function to be performed. BASIC is very tricky and likes to 
use an existing routine or part of an existing routine if possible, 
rather than having to include the same instructions at two locations. 
Many levels of JSRs, stack manipulation of the return address, and 
other tricky techniques may be confusing when you're first examin- 
ing a routine. 

It's typical to use one routine to set up parameters for an exist- 
ing routine to process. The descriptions below attempt to identify the 
fact that another routine is called to perform the task attributed to a 
particular routine. They also indicate places where BASIC falls 
through, or doesn't exit at the end of a routine, but instead continues 
on to the next sequential routine. 

49152 SCOOO GOLDST* 

Vector to the routine for the cold start of BASIC, 58232 ($E378). 

This vector is used to start BASIC at the end of the system's 
power-on/reset routine at 64802 ($FD22) START. A JMP ($C000) is 
performed as the last instruction of that routine. Any autostart car- 
tridge would cause the START routine to branch to it, rather than to 
BASIC via this vector. 

See the START routine for details of the power-on/reset func- 
tions performed. 

See location 58232 ($E378) for the activities performed during 
the cold start of BASIC. 

491S4 $C002 WARMST* 

Vector to the routine to the warm start of BASIC, 58471 ($E467). 

When the RUN/STOP-RESTORE keys are both pressed, the 
BREAK* routine at 65234 ($FED2) uses this vector, via a JMP 
($C002), to go to the WARMBAS* routine after it has completed its 
duties. 

See the BREAK* routine at location 65234 ($FED2) for details of 
the RUN/STOP-RESTORE and ML BRK instruction functions 
performed. 

See 58471 ($E467) WARMBAS* for the activities performed dur- ^ 

ing the warm start of BASIC. 

49IS6 $C994 CBMBASIC* \ i 

CBMBASIC characters. '^^ 

49194 $C99C STMD5P . , 

(handy location) * — f 

Kejrword dispatch vector table, in token order. 

This area contains vectors to the routines that handle each \ ' 
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BASIC keyword. Functions and math operation vectors are in sepa- 
rate tables at locations 49234 ($C052) and 49280 ($C080), while the 
BASIC words themselves are in a table at location 49310 ($C09E). 
The vectors in this table point one byte before the actual routine, so 
add one to the vectors in memory. This minus-one vector is used so 
that the address may be placed on the stack, and so that an RTS 
instruction will add one to the address on the stack and jump three. 
The RTS is issued at the end of CHARGET. 

This table is used by the routine at 51172 ($C7E4) that reads 
and executes the next BASIC statement. 

You can use this table to locate the routine that processes BASIC 
keywords, then disassemble the routine to examine its methods and 
dependencies. 

The following table shows the contents of this area, except that 
the LSB/MSB has been reversed, and that one has been added to the 
routine address to reflect its true location. 



Table 8-1. BASIC Keyword Handlei V^cter Table 



n 
n 
n 
n 



BASIC 


Vector at 


Routine 


Keyword 


Dec Hex 


Dec Hex 


END 


49164 $C00C 


51249 $C831 


FOR 


49166 $C00E 


51010 $C742 


NEXT 


49168 $C010 


52510 $CD1E 


DATA 


49170 $C012 


51448 $C8F8 


INPUT* 


49172 $C014 


52133 $CBA5 


INPUT 


49174 $C016 


52159 $CBBF 


DIM 


49176 $C018 


53377 $D081 


READ 


49178 $C01A 


52230 $CC06 


LET 


49180 $C01C 


51621 $C9A5 


GOTO 


49182 $C01E 


51360 $C8A0 


RUN 


49184 $C020 


51313 $C871 


IF 


49186 $C022 


51496 $C928 


RESTORE 


49188 $C024 


51229 $C81D 


GOSUB 


49190 $C026 


51331 $C883 


RETURN 


49192 $C028 


51410 $C8D2 


REM 


49194 $C02A 


51515 $C93B 


STOP 


49196 $C02C 


51247 $C82F 


ON 


49198 $C02E 


51531 $C94B 


WAIT 


49200 $C030 


55341 $D82D 


LOAD 


49202 $C032 


57701 $E165 


SAVE 


49204 $C034 


57683 $E153 


VERIFY 


49206 $C036 


57698 $E162 


DEF 


49208 $C038 


54195 $D3B3 


POKE 


49210 $C03A 


55332 $D824 


PRINT* 


49212 $C03C 


51840 $CA80 
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BASIC 


Vector at 


Routine 


Keyword 


Dec Hex 


Dec Hex 


PRINT 


49214 $C03E 


51872 $CAAO 


CONT 


49216 $C040 


51287 $C857 


LIST 


49218 $C042 


50844 $C69C 


CLR 


49220 $C044 


50782 $C65E 


CMD 


49222 $C046 


51846 $CA86 


SYS 


49224 $C048 


57639 $E127 


OPEN 


49226 $C04A 


57787 $E1BB 


CLOSE 


49228 $C04C 


57796 $E1C4 


GET 


49230 $C04E 


52091 $CB7B 


NEW 


49232 $C050 


50754 $C642 



The following keywords follow the dispatchable kejrwords in 
the keyword table at 49310 ($C09E). They are not in the keyword 
dispatch vector table since they never begin a BASIC statement. 

FN 

NOT 

SPC 

STEP 

TAB 

THEN 

TO 

49234 $C052 FUNDSP 

Function dispatch vector table, in token order. 

This area contains vectors to the routines that handle each 
BASIC function. Keywords and math operation vectors are in sepa- 
rate tables at locations 49164 ($COOC) and 49280 ($C080), while the 
BASIC words themselves are in a table at location 49310 ($C09E). 

Functions are defined as those BASIC words that are followed 
by parentheses. The expression within the parentheses is resolved 
before the function is called. 

Notice that the vector for USR is location 0000, the JMP opcode 
and vector that the user set for the ML routine. The expression 
evaluation routines beginning at 52638 ($CD9E) uses this table to set 
the jump vector at location 84-86 ($54-56) to the routine for the 
needed function. A JSR ($0054) is then done to the routine, equiva- 
lent to a GOSUB in BASIC. 

You can use this table to locate the routine that processes BASIC 
functions, then disassemble the routine to examine its methods. 

The ifoUowing table shows the contents of this area, except that 
the LSB/MSB has been reversed. 
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Table 8-2. 


BASIC Function flandlei Vector Table 




BASIC 


Vector at 


Routine 


r 


Function 


Dec Hex 


Dec Hex 


SGN 


49234 $C052 


56377 $DC39 




INT 


49236 $C054 


56524 $DCCC 


n 


ABS 


49238 $C056 


56408 $DC58 


USR 


49240 $C058 


00000 $0000 




FRE 


49242 $C05A 


54141 $D37D 




POS 


49244 $C05C 


54174 $D39E 




SQR 


49246 $C05E 


57201 $DF71 




RND 


49248 $C060 


57492 $E094 




LOG 


49250 $C062 


55786 $D9EA 




EXP 


49252 $C064 


57325 $DFED 




COS 


49254 $C066 


57953 $E261 




SIN 


49256 $C068 


57960 $E268 




TAN 


49258 $C06A 


58033 $E2B1 




ATN 


49260 $C06C 


58123 $E30B 




PEEK 


49262 $C06E 


55309 $D80D 




LEN 


49264 $C060 


55164 $D77C 




STR 


49266 $C072 


54373 $D465 




VAL 


49268 $C074 


55213 $D7AD 




ASC 


49270 $C076 


55179 $D78B 




CHR 


49272 $C078 


55020 $D6EC 




LEFT 


49274 $C07A 


55040 $D700 




RIGHT 


49276 $C07C 


55084 $D72C 




MID 


49278 $C07E 


55095 $D737 



$C080 OPTAB 

Math operation dispatch vector table, in token order. 

This area contains vectors to the routines that handle BASIC 
math operations. Keywords and function vectors are in separate tables 
at locations 49164 ($C00C) and 49234 ($C052), while the BASIC 
words themselves are in a table at location 49310 ($C09E). 

The math operation vectors are accompanied by a byte indi- 
cating the order of precedence for that math operation. Those with 
higher precedence are performed before those with lower prece- 
dence. When two operations with equal precedence are encountered 
on the same line, they're performed in order from left to right. 

Order of precedence of expression evaluation 

1. Formulas enclosed in parentheses 

2. Exponentiation ( f ) 

3. Negation {—xyz, where xyz is an expression) 

4. Multiplication and division 

5. Addition and subtraction 
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6. Relational tests: =, <>, <,>,<=, => have equal precedence 

7. NOT logical and bit operations 

8. AND logical and bit operations 

9. OR logical and bit operations 

The formula evaluation routine FRMEVL at 52638 ($CD9E) uses 
this table to find the routine to process the math operation and to 
determine the order of precedence within the expression. FRMEVAL 
sets the jump vector at location 34-35 ($22-23) to the routine for the 
math operation. A JMP ($0022) is then done to the routine, equiva- 
lent to a GOTO in BASIC. The vectors in this table point one byte 
before the actual routine, so add one to the vectors in memory. 

You can use this table to locate the routine that processes BASIC 
math operations then disassemble the routine to examine it. 

The following table shows the contents of this area, except that 
the LSB/MSB has been reversed. One has been added to the routine 
address to reflect its true location. 

Table 8-3. BASIC Math OperaUon Handlei Vector Table 



BASIC 


Precedence: 


Vector at 


Routine 


Operation 


largest first 


Dec Hex 


Dec Hex 


+ 


121 $79 


49280 $C080 


55402 $D86A 


— 


121 $79 


49283 $C083 


55379 $D853 


* 


123 $7B 


49286 $C086 


55851 $DA2B 


/ 


123 $7B 


49289 $C089 


56082 $DB12 


uparrow 


127 $7F 


49292 $C08C 


57211 $DF7B 


AND 


80 $50 


49295 $C08F 


53225 $CFE9 


OR 


70 $46 


49298 $C092 


53222 $CFE6 


mondatic- 


125 $7D 


49301 $C095 


57268 $DFB4 


NOT 


90$5A 


49304 $C098 


52948 $CED4 


<=> 


100 $64 


49307 $C09B 


53270 $D016 



$C09E 

(handy location) 
BASIC keyword table in token number order. 

The complete vocabulary of BASIC keywords, functions, and 
math operators, minus the PI symbol, are stored here in token num- 
ber order. Each word ends with the high order bit on, a value of 128 
($80) added to the value for the ASCII character. The table is ended 
by a byte containing zero. 

This table is used to tokenize the BASIC words when they are 
entered in direct mode or added or changed in edit mode. The rou- 
tine that does this tokenization is at 50553 ($C579). When the 
BASIC program is LISTed, the routine at 50970 ($C71A) uses this 
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table to detokenize the BASIC words. 

Token number order corresponds to the order of words listed in 
rn the following three tables. For instance, the last word in the first 

' table comes before the first word in the second table. Note the 

change of order in the tables; it differs from their order in memory. 
j— I You can also refer to Appendix C, which lists the tokens in number 

' ' order. Along with the three tables, there are two other elements in 

the token number order; they follow the tables in this order. 

• 49164 ($COOC) STMDSP Keywords 

The keywords FN, NOT, SPC, STEP, TAB, THEN, and TO follow 
the dispatchable keywords in the keyword table, since they never 
begin a BASIC statement. Yet these keywords precede the first 
words in the next table. 

• 49280 ($C080) OPTAB Math operations 

• 49234 ($C052) FUNDSP Functions 

• GO 

• as end of table marker, causing SYNTAX ERROR message if 
the token wasn't found in the table. 

The word GO is added to allow GO TO to be considered a valid 
word. The routine GONE, which reads and executes the next BASIC 
statement, includes instructions to cause GO TO to use the same 
routine as GOTO. 

If you know that you want the word that corresponds to a given 
token number (TN for example), the following routine will set X$ to 
the corresponding word. The token number must be between 128 
and 203: 

Pffogram 8-1. Token Number to Token Word 

10 0PEN4,4 
15 Y=0 

20 X = 49310 : A = 49310 
25 TN=139 
30 Z =TN - 127 

40 IF PEEK(X) > 127 THEN Y = Y+1 : E = X : B = A : 
A = E+1 :IFY=ZTHEN55 
j I 45 X = X + 1 
50 GOTO 40 

55 X$="" : FOR X = B TO E 
60 X$ = X$+CHR$(PEEK(X) AND 127) 
65 NEXT: PRINT#4,TN,X$ : PRINT#4: CLOSE 4 



Use OPEN 4,3 for screen display, rather than printing it out. 

Lines 15-20 set values for Y, X, and A. Respectively, these are 
initialized as the word counter, and as the start of the ke3rword table. 
Line 25 sets TN (Token Number) to 139 for this demonstration. You 
can use any number greater than 127 and less than 204. 
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When the end of the word is found, line 40 counts the word, 
saves it, ends it, begins again, and then sets the next beginning. X is 
incremented in line 45 to look for the next byte of the table, while 
line 50 simply loops the program back to line 40 until the word is 
found. The range of the word in the table is set in line 55, and then 
line 60 adds the character to X$, minus any high order bit. — 

By changing a few lines, you can print the entire table out in |_J 

token number order: 

25 FOR TN=128 TO 203: REM PRINT ALL TOKEN WORDS 
65 NEXT:PRINT#4,TN,X$:NEXT TN:PRINT#4: CLOSE 

Depending on your particular need, you may want to consider 
the technique outlined in location 153 ($99) for creating a 
detokenized program listing on tape. 

If you're programming in ML, you'll want to examine the rou- 
tine at $C724-C740 as a model for your own routine. It has too 
many LIST dependencies to JSR to directly. 

See Appendix C for a list of the tokens and their corresponding 
token numbers. 

49S66 $CI9E ERRTAB 

Table of BASIC error messages. 

BASIC preempts the Kernal error messages in program mode. 
BASIC has its own error messages, and prefers them over the Kernal 
message of I/O ERROR plus an error number. See the list of Kernal 
messages at location 61812 ($F174). 

The following program can be used to produce a reference chart 
showing the message number, vector address, message address, and 
complete text of each message: 

Prognm 8—2. Error Message Display 

10 OPEN 4,4 : REM CHANGE TO 4,3 TO DISPLAY ON THE 

{SPACE} SCREEN 
20 PRINT#4,"NUM VECTOR MSG @{2 SPACES} MESSAGE 

" : PRINT#4 > I 

30 FOR V = 49960 TO 50019 STEP 2 : N = N + 1 : N$= l—J 

" "+RIGHT$(STR$(N),2) 
40 S = PEEK(V) + ( PEEK(V+1)*256 ) 

50 PRINT#4,N$;V;S"{SHIFT-SPACE}"; : T=0 M 

60 PRINT#4,CHR$( PEEK(S+T) AND 127 ) ; : IF PEEK(S+ 

T) <128 THEN T=T+1: GOTO 60 
70 PRINT#4 : NEXT 
80 FOR X=l TO 20 : PRINT#4 : NEXT : END 
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TaVto 8r-4. BASIC Error Messages 

The last letter of each message has the high order bit on. 

Dec Hex Error Message 

1 $01 TOO MANY HLES 

2 $02 FILE OPEN 

3 $03 FILE NOT OPEN 

4 $04 FILE NOT FOUND 

5 $05 DEVICE NOT PRESENT 

6 $06 NOT INPUT FILE 

7 $07 NOT OUTPUT FILE 

8 $08 MISSING filer\ame 

9 $09 ILLEGAL DEVICE NUMBER 

10 $0A NEXT WITHOUT FOR 

11 $0B SYNTAX 

12 $0C RETURN WITHOUT GOSUB 

13 $0D OUT OF DATA 

14 $0E ILLEGAL QUANTITY 

15 $0F OVERFLOW 

16 $10 OUT OF MEMORY 

17 $11 UNDEF'D STATEMENT 

18 12 BAD SUBSCRIPT 

19 $13 REDIM'D ARRAY 

20 $14 DIVISION BY ZERO 

21 $15 ILLEGAL DIRECT 

22 $16 TYPE MISMATCH 

23 $17 STRING TOO LONG 

24 $18 FILE DATA 

25 $19 FORMULA TOO COMPLEX 

26 $1A CAN'T CONTINUE 

27 $1B UNDEF'D FUNCTION 

28 $1C VERIFY 

29 $1D LOAD 

30 $1E BREAK (located in 50020 $C364 table) 



$C328 BMSGS"^ 

BASIC error message table vectors. 

This area contains 30 pointers to the start of each message in 
location 49566 ($C19E), in message number order. The BASIC rou- 
tine ERROR, which displays error messages, uses this table to deter- 
mine the location of the message text by the number given to it in .X. 
Because of this, other BASIC routines need not be concerned with er- 
ror message text, only error numbers. 

See location 49566 ($C19E) for a program to print all the BASIC 
error messages and these pointers. 
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50020 $G364 MISCMSG* "^ 

Miscellaneous messages. 

Each message is ended with a byte containing zero. The mes- j } 

sages (which include carriage returns, spaces, and linefeeds), are: 

• <carriage return> OK <carriage retum> , — 
This message is displayed when VERIFY is successful in the j_J 

BASIC routine BLOAD, which also performs the VERIFY for the 
BVERIF routine. 

• <carriage return> <space> ERROR 

The BASIC routine PRDY, which is part of the ERROR 
sequence, causes this message to follow a message already displayed. 

• <space> IN <space> 

After the message ERROR has been displayed, the BASIC rou- 
tine PRDY calls the BASIC routine PRTIN to print this message and 
the line number. 

• <carriage retum> <linefeed> READY. <carriage retum> 
<linefeed> 

The BASIC routine READY displays this message for several 
reasons, and goes to the routine MAIN, the main BASIC processing 
loop. 

• <carriage return> <linefeed> BREAK 

BASIC'S routine PRDY prints this message and calls PRTIN to 
print IN and the line number. These are printed when a program 
encounters STOP or the RUN/STOP key is pressed. 

50058 $C38A SCNSTK 

Find FOR and GOSUB entries on the stack. 

The stack at 256-511 ($100-1FF) STACK is searched for a 
particular FOR variable, or for the first one. This area is called by 
NEXT, FOR, and RETURN routines. 

RETURN is looking for the return pointer on the stack and 
deletes any FOR information it finds. This can be used to your 
advantage by placing a loop you wish to terminate early in a 
GOSUB routine. 

See locations 73-74 ($49-4A) (FORPNT) and 256 ($100) j l 

(STACK). ^ 



50104 $C3B8 MAKSPG 

Open space in memory for a new BASIC line or variable. 

This area is called when a new scalar variable is created or 
when a BASIC line is stored or replaced. It calls RAMSPC ($C408) to 
insure that the space is available, and to do garbage collection if not 
enough space is free. This also adjusts the STREND pointer at loca- 
tion 49-50 ($31-32), which indicates the start of free area. It then 
falls through to the next routine. 
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501U SCSBr 

Move a block of memory. 

When a new scalar variable is created, a BASIC line is stored or 
replaced, or when garbage collection needs to move memory, this is 

^m called. 

n This area calls RAMSPC ($C408) to check that space is available 

and moves the program and/or variables upward to make room. By 
calling this routine with .A/.Y set to the end of the BASIC dynamic 
area desired, you could allocate space in that area for your own pur- 
poses, or use the technique to move blocks of memory upward. 
However, this is an advanced topic to explore, and much coordina- 
tion is required with other pointers. See location 49 ($31), the 
pointer to the start of the free area. 

50171 $C3FB STKSPC 

Check stack requested space available. 

Produces OUT OF MEMORY message if the requested amount 
of stack space, multiplied by two, is unavailable. GOSUB, FOR, and 
formula evaluation call this routine. 

This can be a convenient routine to call from ML. 

50184 $C408 RAMSPC 

Check that requested space in dynamic area is available. 

This routine compares the to-be-allocated end address with the 
contents of location 51-52 ($33-34), the pointer to the bottom of 
BASIC active strings. 

It calls for garbage collection if not enough space is free and 
produces an OUT OF MEMORY message if the requested amount of 
memory is still unavailable after that. 



$0435 MEMERR 

Set OUT OF MEMORY error message code. 

Falls through to the next routine. 

50231 $0437 ERROR 

BASIC error message routine. 

The number of the desired error message is passed to this rou- 
tine in .X. The routine PRTOS at ($CB3B) is called to display a ques- 
tion mark. 
(— I This routine looks up the message number vector in the vector 

' ' table at 49960 ($C328) and displays the message the address points 

to. The address points within the BASIC error message table at 
49566 ($C19E). The first instruction of this routine is a JMP ($0300), 
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so you can change the vector at 768 ($300) to point to a front-end or 
alternate routine if you want. 

This routine calls for a close of all input/output channels, resets It 

the current channel in 19 ($13) to the screen (the error messages ^ 

always appear on the screen — this cancels any CMD device that was 
specified), and causes the stack to be cleared. p. 

The routine at 51998 ($CB1E) is called to actually display the U 

error message on the screen. 

INPUT routines issue messages with a different routine, since 
processing can continue in their case. 

This routine then falls through to the next routine. 



$C469 PRDY 

Display ERROR, or another message pointed to. 

This routine is also used to display the BREAK message instead 
of the ERROR message. 

It calls the routine PRTIN at 56770 ($DDC2) to display the word 
IN and line number message if not in direct mode. 

This routine then falls through. 

S0292 $C474 READY 

Display READY, message. 

The READY, message is displayed and the Kemal control mes- 
sages are enabled by this routine. See location 157 ($9D) for details 
of these messages. 

The routine PRTSTR at 51998 ($CB1E) is called to achially dis- 
play the error message on the screen. 

This could be a convenient routine to call from ML. 

This routine then falls through. 



$C480 MAIN 

Main BASIC loop, receive and execute or store BASIC line. 

The first instruction in this routine is JMP ($0302), which nor- 
mally points back to the next sequential instruction. By changing 770 
($302), you can intercept the keyboard input to BASIC. M 

This routine calls GETLIN at location 50528 ($C560) to obtain a 
line from the keyboard, then goes to the routine NEWLIN (the next 
routine) if a line number is present on the entered line, or to the rou- j ( 

tine CRNCH if no line number is present. Direct commands and pro- — 

gram lines are separated at this point because of this. 

S0332 $C49C NEWUN U 

Store/replace a BASIC program line. 

This routine tokenizes the line by calling CRNCH at 50553 
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($C579), then tries to locate the same line number in the BASIC pro- 
gram. If it's found, this routine deletes it. The newly entered line is 
added to the program in line number sequence, unless only a line 
number was entered. The latter does not cause a new line to be 
entered after the old line was deleted. 

This routine resets the CHRGET 122-123 ($7A-7B) pointer to 
the start of the BASIC program when a line of BASIC is entered. 
This is done by calling STXTPT ($C68E) to copy 43-44 ($2B-2C) 
TXTTAB into TXTPTR. 

The CLR routine at 50782 ($C65E) is called, losing all current 
program variables. 

The BASIC lines are also rechained by calling LNKPRG 50483 
($C533). 



$CS33 LNKPRG 

Rechain BASIC program lines. 

This routine recalculates and stores program line link fields by 
examining each line of the BASIC program, from where pointer 43- 
44 ($2B-2C) TXTTAB is pointing up to an old link field containing 
zeros. That signals the end of the program. 



50528 $C560 

Receive input from device and fill the BASIC text buffer. 

This routine is also used for INPUT and INPUT*. 

It calls the Kemal routine CHRIN 61966 ($F20E) through the 
vector at 804 ($324) to obtain input characters from the open chan- 
nel until a carriage return or 89 characters have been received. A 
STRING TOO LONG error message is displayed if no carriage return 
is found within the 89-character input stream. The characters are 
stored in the BASIC input buffer at 512-600 ($200-258). The car- 
riage return stores a byte in that buffer. (The BASIC 2.0 feature of 
a 15 ($0F) character on input suppressing the display of the charac- 
ters to the screen has been dropped.) The length of the BASIC input 
buffer and the coding of this routine are the cause of the 88-byte 
INPUT restriction. 



50553 $0570 

Tokenize the BASIC line in BASIC text buffer. 

This routine tokenizes the line from and back into the BASIC 
text buffer at location 512 ($200), using the table of tokens at 49310 
($C09E). Bytes within quotes are not tokenized, and the ? word is 
replaced by the PRINT token. 

This is the routine that recognizes abbreviations for BASIC 
keywords. TXTPTR at location 122 ($7A) is used as a pointer 
through the process. 
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The length of the resulting tokenized line is stored in 11 ($B). A 
vector to this routine is at location 772-773 ($304-305). 

50707 $G6I3 nNLIN ^ 

Find the BASIC line from its line number. 

The two-byte integer line number in location 20-21 ($14-15) is |_J 

searched for in the BASIC program lines by this routine. Location 
95-96 ($5F-60) is set to the address of the link field for that line, if 
found, and the carry is set in .P. This routine is called by the routine 
NEWLIN, and the BASIC keywords LIST, GOTO, and GOSUB. 

The RTS at the end of this routine is used by many routines. 

507S4 $C642 NEW 

BASIC NEW. 

This routine stores zeros in the first BASIC line field and sets 
the end-of-BASIC program pointer at 45-46 ($2D-2E) to the con- 
tents of 43-44 ($2B-2C) plus two bytes. It also calls the routine 
STXTPT 50830 ($C68E) to set TXTPTR to the beginning of the 
BASIC program. 

See location 43-44 ($2B-2C) for methods of recovering from an 
inadvertent NEW. 

This routine is called by routine INITBA 58276 ($E3A4) at 
power-on/reset. 

This falls through to the next routine. 



$C6SE CLR 

BASIC CLR. 

First, a call is made to the ICLALL vector at 812-813 ($32C- 
32D), which points at the abort-all-files routine CLALL at 62447 
($F3EF). 

The BASIC strings are eliminated by changing the pointer to the 
bottom-of-BASIC active sbings at 51-52 ($33-34) to the current con- 
tents of 55-56 ($37-38), which is the pointer to the end-of-BASIC 
memory. The pointer to the end-of-BASIC program at 45-46 ($2D- 
2E) is copied to 47-48 ($2F-30), the pointer to the end-of-BASIC Li 

variables, as well as copied to 49-50 ($31-32), the pointer to the 

end-of-BASIC arrays, start of free area. This eliminates all scalar and 

array variables. The variables have not been actually erased, though. | ( 

RESTORE is called to reset 65-66 ($41-42) to the beginning of the 
BASIC program. 

This routine is called when RUN is entered in direct mode, an \~\ 

RS-232 OPEN is done, or NEW is issued. 1—1 

The temporary string stack at 22 ($16) TEMPPT is reset, and the 
6502 stack pointer (.S) is also reset. For that reason, you won't want 
to call this routine from within a subroutine. The stack pointer is set 
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to 506 ($1FA), leaving the most recent JSR return address on the 
stack. This stack clearing is also called for by a warm restart (RUN/ 
STOP-RESTORE key) or an error message being issued by ERROR. 

50830 $CG8E STXTPT 

Back up TXTPTR to the start of the program. 

This routine copies the contents of location 43-44 ($2B-2C) into 
location 122-123 ($7A-7B) so the program will be scanned from the 
beginning. 

If SYS 50830 is executed in a BASIC program, the program will 
branch to the first line of the program. 

This is called by the LOAD and NEW routines. 

50844 SCeOC LIST 

BASIC LIST. 

This performs the LIST function with its various formats of: no 
line numbers, line number range, starting at line number, up to a 
given line number, or only a specific line number. 

The ending line number (or ($FFFF) for all) is stored in location 
20-21 ($14-15). The LIST routine calls the routine FINLIN at 50707 
($C613) to find the starting specified BASIC line. Location 95-96 
($5F-60) is used as pointer through the BASIC program as it is 
listed. Link fields on the BASIC lines are used to find the next line. 
Routine PRTFIX 56781 ($DDCD) is used to print the line number. 
The stop key is tested for after every line displayed. 

LIST calls QPLOP 50970 ($C71A) to perform detokenizing of 
the BASIC lines. 

See location 153 ($99), the input device number, for instructions 
for reading tape as though it were the keyboard, using LIST. 

LIST does not recognize the fact that it is within a REM state- 
ment and will detokenize any tokens found there. This can cause a 
SYNTAX ERROR message if the character has a code greater than 
127, but not 255 (PI). Try including a shifted L in a REM, and you'll 
receive a SYNTAX ERROR message. 

REM-embedded cursor controls, color controls, and reverse con- 
trols will be printed as found, causing differences between the actual 
program and displayed listing. This can be used to customize or dis- 
guise the program listing. When the same LIST is directed to a 
printer with CMD, most of the manipulations done with REM- 
embedded controls will be revealed. 

50070 $C71A QPLOP 

List detokenized BASIC keywords. 

This routine is logically part of the LIST routine ($C69C) and 
may not be used as a separate routine. However, it is fairly short 
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and may be used as a model. * — 

All characters are sent to this routine, which branches to two 

addresses, depending on whether the input was displayed as r "j 

untokenized or was not a token. I — I 

A JMP off the vector at 774 ($306) is the first instruction in the 

routine, normally jumping back to the next instruction. That vector --— 

may be changed to intercept this routine, providing the capability to | f 

LIST added ke5rwords. 

SIOIO $G742 FOR 

BASIC FOR. 

FOR is one of the most powerful BASIC keywords. This routine 
sets up the FOR environment and NEXT controls the repetition of 
the desired loop. Eleven JSR calls are contained within FOR, demon- 
strating the large amount of work done for you by this word and 
routine. 

FOR saves the details of the requested loop on the stack; see the 
description of the stack entry for FOR to location 256 ($100). 

The variable used in FOR must be a scalar floating point. In 
other words, there can be no % in the name. By reissuing a FOR 
loop for the same variable name, the previous FOR and all inter- 
nested FORs are cancelled. The variable used in FOR may be 
changed within the loop to control the number of repetitions. How- 
ever, a variable used to express the upper limit of the loop will not 
cause an early end of the loop if it's changed within the FOR loop. 
This is because the upper limit is stored within the stacked items. 

A FOR loop is always executed at least once. 

If you leave off the name of a NEXT statement, you must insure 
that the correct nesting of FOR loops is maintained. 

51118 $C7AE NEWSTT 

Finds (for execution) the next BASIC statement. 

This routine tests for the STOP key being pressed, updates the 
CURLINE location (57-58, $39-3 A), which holds the current BASIC 

line number, if not in direct mode, and positions TXTPTR to the r -; 

beginning of the statement. 1 I 

Location 776-777 ($308-309) contains a vector to this routine. If 
the end of program is detected by a 0,0 in the link field, the END 
routine is jumped to. { ( 

This calls the following routine (GONE) to execute the 
statement. 

Direct mode statements skip the CURLIN update. I i 

51172 $C7E4 GONE 

Execute the current BASIC statement. 
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If the statement doesn't start with a token, the routine LET is 
jumped to. 
r-] A vector to this routine is located at 776-777 ($308-309). 

GO TO tokens are treated as though they were GOTO. 
The dispatch vector tables starting at location 49164 ($COOC) are 

n searched and the proper vector for the token is pushed onto the 

stack for the next RTS to cause a branch to that address. 
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$G81D RESTORE 

BASIC RESTORE. 

This resets the beginning of DATA statement scan by simply 
copying the current pointer to the start of the BASIC program to 
location 65-66 ($41-42), the pointer to the DATA statement. 



$C82C TSTSTOP 

Test for STOP key. 

This routine is a JSR to the Kernal jump vector at 65505 
($FFE1), falling through to the next routine. 

51247 $C82F 8ST0P 

BASIC STOP. 

This routine also falls through to the next routine, skipping the 
clear carry instruction to differentiate between STOP and END. 

51249 $C831 END 

BASIC END. 

This routine clears the carry flag to indicate an END was issued. 
The current BASIC line number is moved from 57 ($39) to 59 ($3B) 
for a possible CONT being entered later. The current TXTPTR value 
is also saved for the same reason. The value at location 57 ($39) is 
copied to 59 ($3B). The return address is dropped from the stack and 
KEADY. or BREAK IN nnn is displayed. 

51287 $C857 CONT 

BASIC CONT. 

The saved TXTPTR at 61 ($3D) and the saved CURLIN at 59 
($3B) are restored from 59 ($3B), where STOP, END, or the RUN/ 
STOP key saved them in routine END ($C831). Location 62 ($3E) is 
tested for a and a CAN'T CONTINUE error message is issued if 
this value is found. (An ERROR caused the break — or program lines 
were changed.) 

Otherwise, CONT allows GONE ($C7E4) to execute BASIC 
from where it was interrupted. 
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A GOTO line number may work when CANT CONTINUE is 
received, depending on file and variable requirements of the 
program. 
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S1313 $G871 RUN '"' 

BASIC RUN. ._ 

This routine resets the TXTPTR to the beginning of the program LJ 

if no line number was entered with RUN, or causes the specified line 
number to be acted upon by the GOTO routine. Either way, a CLR 
is performed, losing all current variables. 

S1331 $C883 GOSUB 

BASIC GOSUB. 

The following information is pushed onto the stack in the order 
listed by this routine: 

1. The current TXTPTR (location of the characters being scanned by 
BASIC, so it can resume here at RETURN) 

2. The CURLINE value (so that the current line can be resumed) 

3. The constant value of 141 ($8D) (to identify the GOSUB entries 
on the stack) 

Then a JSR to the GOTO routine is performed. 

A subroutine may call itself (called recursion), but some type of 
exit logic must be included to prevent the stack from being filled by 
GOSUB entries. 

See the search direction discussion at location 20-21 ($14-15) 
and the subroutine location discussion at 43-44 ($2B-2C) TXTTAB. 

51360 SCBAO GOTO 

BASIC GOTO. 

The target line number is converted from character to LSB/MSB 
using the DECBIN routine, which places the output integer in loca- 
tion 20-21 ($14-15). The MSB only of the current line and the MSB 
of the target line are compared. If the target is higher, the routine 
FINLIN ($C613) is called to find the line from the line number, and 
TXTPTR is adjusted. Otherwise, TXTTAB is used as a parameter to r -j 

FINLIN, and the scan for the line number starts at the beginning of I I 

the program. Once again TXTPTR is adjusted, and when CHRGET is 
later called, that line will be executed. - - 

I ( 

SI410 $C8D2 RETURN 

BASIC RETURN. _ 

This routine calls SCNSTK 50058 ($C38A) to find the GOSUB LJ 

entry, moves the CURLIN saved contents that are in the stack to 
CURLIN and the TXTPTR saved in the stack to TXTPTR, thereby 
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directing NEWSTT 51118 ($C7AE) back to the statement following 
GOSUB. 

The routine also puts ($FF) into FORPNT+1 (73-74, $49-4A) 
which effectively cancels any FORs from within the subroutine. 

SI448 $C8F8 SKIPST 

BASIC DATA. 

A very simple routine, this calls FIND2 51462 ($C906) to find 
the next statement and falls through to the next routine. 

Quotes can be used to include commas and colons in a DATA 
string. Outside of quotes, a comma delimits the DATA item and a 
colon ends the DATA statement. 

A null DATA item is created by double commas or an ending 
comma. 



$C8FB BUMPTP 

Increment TXTPTR by amount in .Y. 

This routine is called when several bytes of the current line/ 
statement need to be skipped. This is ended with an RTS that usu- 
ally goes back to the NEWSTT routine at 51118 ($C7AE). 

51462 $G906 FINDZ 

Scan the BASIC text buffer at 512 ($200) for delimiters. 

FIND2 is usually used to find the next BASIC statement or line. 
Locations 7 and 8 are used to contain the characters being searched 
for. The routine automatically ends the search if an end-of-line zero 
byte is found and ignores delimiters while inside quote marks. 

51496 $C928 IF 

BASIC IF. 

This is a fairly simple routine in comparison with the program- 
ming flexibility it gives you. It calls the FRMEVL routine at 52638 
($CD9E) to do the hard part of reducing the expression to a single 
term. IF then simply checks the exponent of Floating Point Accu- 
mulator 1 at 97 ($61) for a 0, which indicates the whole accumulator 
is zero and the text is false. If it was a 0, IF calls FIND2 to skip the 
rest of the line, jumps to BUMPTP, and then goes on to NEWSTT 
for the next line to be executed. If the statement was true 
(FACEXPoO), GONE ($C7E4) is branched to, unless a following 
THEN was followed by numerics, in which case GOTO is branched 
to. If a GOTO is encountered (GOTO must be followed with 
numerics), the GOTO routine is also branched to. 

GO TO (with a space between the words) is not valid after IF 
unless it is preceded by THEN. Also, IF X THEN 80 is the equivalent 
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of IF X <> THEN 80. Once more, IF X GOTO 80 is perfectly valid. 
The REM routine below is actually part of this IF routine, and IF 
actually ends at 51530 ($C94A). 

51515 $C93B REM 

BASIC REM. 

The REM routine calls FIND2 51462 ($C906) to skip the rest of 
the line, jumps to BUMPTF, and then goes on to NEWSTT to exe- 
cute the next line. 

The REM routine is actually part of the previous IF routine. 

51531 $C94B ON 

BASIC ON. 

GOSUB or GOTO must follow the variable name and GO TO 
(with an embedded space) is invalid. This routine decrements the 
LSB of FAG 101 ($65), until it reaches 0, skipping numbers between 
commas until then. It then passes the GOTO or GOSUB token and 
the target line number to the routine GONE at 51172 ($C7E4) to 
execute. 

If the list of line numbers is shorter than the value of the vari- 
able, the next statement is executed. For example: 

ON X GOTO 100,200:PRINT "WHOOPS" 

would print WHOOPS if X was 4. 

ON SGN(X)+2 GOTO 10,20,30 

will go to 10 if X is negative, 20 if 0, and 30 if positive. 

If the variable could be and you wish to GOTO/GOSUB on 
that value, add at least 1 to the variable. 
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51563 $G96B 

Convert decimal line number to LSB/MSB format. 

This routine is called by the BASIC commands GOTO, LIST, 
and ON. It's also called by the routine NEWLIN when adding, 
replacing, or deleting a BASIC line. - - 

This is used to convert and range-check (0-63999) a line num- 1 1 

ber, placing the output LSB/MSB format in location 20-21 ($14-15). 

51621 $C9A5 LET [J 

BASIC LET. 

This routine controls the reassignment or creation and initializa- -- - 

tion of scalar and array variables: strings, floating point, integer, TI$, {_] 

and TI. 

When this routine is finished, the variable or descriptor has 
been created or modified in the variable pool. I j 
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This is a rather long routine, with 17 JSRs. Not all are used for 
the same variable types, though. 

'"l The following routines are always called: 

EVLVAR ($D08B) evaluate variable 
TYPCHK ($CD8A) type-match checking 

^ FRMEVL ($CD9E) evaluate expression 

' ' with others called depending on the contents of locations 13 ($D) 

(type of variable: 255 ($FF)= string; 00=numeric) and 14 ($E) 
(numeric variable type: 128 ($80)= integer; 00= floating point), 
which are used to determine the type of variable processed. These 
flags are set by the initial call to the EVLVAR routine ($CF28). 

Floating point variable assignment is passed to routine FACTFP 
at 56272 ($DBDO) which stores the Floating Point Accumulator in 
memory as a variable. 

51650 $C9C2 LET2 

LET: Assign integer variable. 

51674 $G9DA LETS 

LET: Assign TI$. 

51756 $CA2C LET9 

LET: Assign string variable. 

51840 $CA80 PRINTN 

BASIC PRINT#. 

This routine calls CMD, the following routine, and then jumps 
to the CLRCHN 65484 ($FFCC) routine to close the output channel. 

51046 SCAOO CMD 

BASIC CMD. 

This routine calls OUTCHN 65481 ($FFC9) to open the output 
channel, stores the file number in location 19 ($13), stores the cur- 
rent channel number for BASIC I/O routines, and goes to the rou- 
ij tine PRINT at 51872 ($CAAO) for the processing of any PRINT* 

style parameters included. Since PRINT* calls this routine, there is a 
very good chance that there will be parameters. 

Unlike PRINT#4, CMD4 leaves the device in listen mode so that 
future output still is directed to the CMD device. 

See location 19 ($13) for more information on CMD. 

n 51866 SCAOA PRTl 

The instructions from here to location 51871 ($CA9F) are part of 
m the PRINT routine. 
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$CAAO PRINT "-^ 

BASIC PRINT. 

A long routine, PRINT includes instructions to handle the vari- Li 
ous forms of output parameters possible, such as floating point vari- 
able, TAB, SPC, semicolon, comma, strings, null strings, carriage 

rehim/linefeed, PI, ST, TI$, and TI. jj 

All variables are converted to strings and eventually printed by 
a call to the CCHROUT vector at 65490 ($FFD2) for each character. 

51944 $CAE8 PRT6 

Part of PRINT, this tabs to the correct column for comma 
delimiter. 

81960 $CAF8 PRT7 

BASIC TAB, BASIC SPC. 

This TAB and SPC processing routine is part of the routine 
PRINT 

TAB and SPC are not for the printer, since they are based on 
the current cursor position. 

51998 SCBIE PRTSTR 

Another part of the PRINT routine, this prints a string ended by 
a carriage return or when the length is decremented to 0. 

This routine is called by several other routines to display mes- 
sages. It can also be called by machine language programs by setting 
the .Y register to the MSB of the message address, and the .A reg- 
ister to the LSB. The message should be ended with a carriage 
return, followed by a byte consisting of O's. 

52027 $CB3B PRTOS 

This section of the PRINT routine prints format characters of 
space, cursor right, or question marks. The latter is for the INPUT 
routine. 



52045 $CB4D 



52091 $GB7B 

BASIC GET. 

This routine disallows direct mode entry, opens the input chan- 
nel, if GET* was specified, by calling INPCHN ($FFC6), and storing 
the channel number the BASIC I/O channel at location 19 ($13). It 
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Error message formatting routine for BASIC keywords GET, . _ 

INPUT, and READ. LJ 

D 
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calls READ ($CC06) to perfonn the I/O, and closes the input chan- 
nel if necessary by calling the CLRCHN routine at ($FFCC). 

You can tell that a single character is being requested by GET, 
rather than multiple characters by INPUT, when the blinking cursor 
is not present. If you add a blinking cursor to your GET routine, 
avoid the character used by the system. Otherwise, the program's 
user can become confused. 

GET (without a file number) retrieves one byte from the key- 
board buffer at 631 ($277), which is filled by the IRQ driven routine. 
For tape, GET retrieves a single character from the BASIC tape 
buffer at location 829-1019 ($33D-$3FB). When these characters are 
exhausted, which is determined by testing location 166 ($A6), an 
additional tape block is read into the buffer. For disk, ST must be 
checked for a 64, meaning this is the last byte of data, because a 
GET* beyond that point will return a carriage return. 

S2133 SCBAS INPUTN 

BASIC INPUT*. 

This routine opens the input channel by calling the vector 
INPCHN at 65478 ($FFC6) and stores the channel number in loca- 
tion 19 ($13). A call to INPUT ($CCBF) is made, then the input 
channel is closed by calling the CLRCHN routine at ($FFCC). 

Rather than EXTRA IGNORED, the extra data is simply dis- 
carded. A FILE DATA ERROR message is issued when the data type 
is different from the variable type. 

52IS9 SCBBF INPUT 

BASIC INPUT. 

This routine disallows direct mode entry. 

The PRTSTR routine 51998 ($CB1E) is called to print any 
prompting message specified and the PRTOS routine at 52027 
($CB3B) for the question mark. The latter is printed only if 19 ($13) 
CHANNL indicates the keyboard. 

GETLIN ($C560) is called to receive the input from the device 
and fill the BASIC text buffer, then READ ($CC06) is jumped to. 
That routine validates the input and assigns it to the proper variables 
named. 

An active CMD causes an INPUT prompt to be displayed on the 
CMD device. 

By placing two quote marks and a delete character into the key- 
board buffer at 631 ($277) and setting the number of characters in 
the buffer to 3 at location 198 ($C6), you can allow commas and 
colons to be entered in response to INPUT. You can do this by 
entering the following line: 
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POKE 198,3:POKE 631,34:POKE 632,34:POKE 633,20:INPUT ^ 

"ENTER MLC OPCODE AND OPERANDS";ML$ 

The first quote mark puts the INPUT routine into a quoted-string j / 

subroutine; the second cancels that mode for the screen editor so — ' 

that the INST, DEL, and cursor keys perform normally. 

The input diversion subject, discussed at locations 153 ($99) and r , 

19 ($13), may be of interest to you. Also see the related discussion at 1 — f 

512 ($200). Another reference is the article "Perfect Commodore 
INPUT," by Blaine Standage, in the January 1983 issue of 
COMPUTE!. 

52230 $CC06 READ 

This routine locates the next DATA item for READ, scans the 
BASIC text buffer with CHRGET and modifications to TXTPTR, 
and assigns incoming information to numeric or string variables, 
producing error messages as needed. 

Location 17 ($11) is used as a flag to indicate which of READ, 
INPUT, or GET is active. Values in that location mean: 0=INPUT, 
64 ($40)=GET, 152 ($98)=READ. See that location for additional 
information. 

82476 SCCFC EXTRA 

INPUT error messages. 

EXTRA IGNORED and REDO FROM START messages, each 
followed by carriage return, linefeed, and a zero byte are created by 
this routine. 

52510 SCDIE NEXT 

BASIC NEXT. 

This routine determines if a FOR loop is needed, based on the 
presence of a variable name with NEXT. See location 73-74 ($49- 
4A) for additional information. This routine calls SCNSTK ($C38A) to 
find the FOR entry, and if not found, issues the NEXT WITHOUT 
FOR error message. 

The stack entries for FOR are used to apply the STOP value to j_J 

the variable and the maximum value specified by TO is checked. If 
the loop is done, the stack entries for FOR are purged. Otherwise, 
CURLIN and TXTPTR are overlaid from the stack values and ; j 

NEWSTT ($C7AE) is branched to. This executes the statement after ^— ' 

the FOR statement. 



$CD8A TYPCHK U 

Variable type checking. 

Different entry points to this routine provide four types of vari- \ " 

able t3^e checking services for calling routines. L_J 



U 



n 






n 



n 



n 



• The first entry point at 52618 ($CD8A) calls FRMEVL ($CD9E) 
to evaluate the expression, then falls through to the next entry point. 

• The second entry point at 52621 ($CD8D) clears the carry flag 
to indicate that a numeric check is to be performed on a variable. 

• The third entry point at 52623 ($CD8F) sets the carry flag to 
indicate that a string check is to be performed. 

• The final entry point at 52624 ($CD90) actually performs the 
test by comparing the carry flag indicator to the variable type flag 
that is stored in location 13 ($D), which is the type of variable flag 
with settings of: 255 ($FF)= string, 00= numeric. If the type match 
fails, then the message TYPE MISMATCH is indicated and the rou- 
tine ERROR ($C437) is branched to. 

Numerous routines call this routine at any of the four entry 
points whenever data needs to be checked before placing it in a vari- 
able or mixing it with other data. 

S2638 $CD9E FRMEVL 

Formula/expression evaluation. 

This is another powerful routine that BASIC provides. This is 
the master routine that drives subroutines which extend to location 
53222 ($CFE6). However, other routines can call subroutines through 
that location, too. 

The function of these routines is to obtain, parse (break apart 
syntactically), error check, combine by performing the indicated 
operations, and resolve to the final answer any expression that the 
BASIC program contains. This is done for both scalar and array vari- 
ables, including string or numeric expressions, as well as for constant 
information and combinations of all. 

These routines can call themselves (recursion) for inner levels of 
expressions to be evaluated. 

The type-of- variable flag at location 13 ($D) is set by the final 
result, as is the numeric variable type flag at 14 ($E), if appropriate. 

A numeric result is in location 97-102 ($61-66) when these 
routines finish their work, while a string result is indicated by a 
pointer in location 100-101 ($64-65). The length of the string will be 
in location 97 ($61). 

Math operation precedence was explored at location 49280 
($C080), the math operation dispatch vector table. 

Because of the usage of the stack to contain intermediate results, 
an OUT OF MEMORY condition may occur if the expression is 
exceedingly complex and stack space is minimal. 

An example of an expression to be evaluated could be: 

STR$(72/(X*A%(3) + (SQR(VAL(D$)))*COS(EXP(Z - INT(SY)) 
+LEN(Q$))))-h"%" 

which is nonsensical, but you can appreciate the power of these 
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routines by working out just the sequence of the operations to be 
performed. 

The math operation table, the stack, the CHRGET routine, string 
routines, floating point routines, stack manipulation routines, vari- 
able type check,and function routines are used when they can aid 
this master routine. 
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$CE83 EVAL 

Evaluate a single term of an expression. 

This routine has a vector at location 778-779 ($30A-30B). 

It performs reduction of a single expression term to its next-level 
form. The PI symbol is replaced by its numeric floating point equiva- 
lent, a number in the program is converted to floating point, and 
negation is performed. 

S2904 $CEA8 PIVAL 

The floating point number PI=$82 $49 $0F $DA $A1. 

S2909 SGEAD 

Factoring is continued. 

NOT is processed, the FN performer at $D3F4 may be called, 
SGN may be called, and so on. 

52948 $CED4 

BASIC NOT. 

NOT is further processed. Part of the EVAL routine. 
Some examples of NOT use: 

NOT X=-(X -1-1), so NOT l = -2, NOT 0=1 

NOT -1= so NOT true = false 

If NOT TF THEN 840. If TF is (false), then the program goes to 

line 840. 

52977 SCEFI PAREXP 

Evaluation within parentheses is performed. 

This is accomplished by calling the following syntax check i i 

routines, then calling routine FRMEVL at 52638 ($CD9E) since inner 
parentheses may be encountered. 

52983 $CEF7 RPAGHK ^ 

Syntax check f or ) 

This falls through to SYNCHR at location 52991 ($CEFF). [J 
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SCEH LMCHK 

i_ Syntax check for ( 

n This is actuaUy called before RPACHK ($CEF7), even though it's 

placed after that routine. This also falls through to SYNCHR 
rn ($CEFF). 

52989 SGEFD COMCHK 

Syntax check for , 

This routine falls through to SYNCHR at location 52991 
($CEFF). 

52991 SCEFF SYNCHR 

Syntax check for a specific character in .A from CHRGET. 

This routine is called from many routines in BASIC. 



53999 $CF99 

Cause SYNTAX ERROR message via jump to ERROR ($C437). 

53995 $CF99 FACTI9 

Set up index for — (monadic minus). 

53912 $CFI4 

Check range of variable ? 



53932 $CF29 

Obtain variable name and type from EVLVAR ($D08B), check for 
null string, and handle TI$, TI, and ST references. 

53159 $CFA7 FAGT17 

Invoke function. 

This routine uses the function dispatch vector table at FUNDSP 
($C052) to set the address of the needed function in location 84-86 
($54-56). A JSR ($0054) is then done to the routine. 

The resolution of the function may need the repeated calling of 
the FRMEVL ($CD9E) routines to perform inner expression 
evaluation. 



SCFES 9RR 

BASIC OR. 

r-j Sets .Y to ($FF) and falls through to the next routine. See the 

• ' next routine for an OR truth table. 
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$CFE9 ANDD "-^ 

BASIC AND. 

This routine performs both AND and OR functions, depending jj 

on the value in .Y. AND is indicated by 00 in .Y while OR is 255 
($FF). The parameters are converted into two-byte integer values 
(—32768 to 32767) before processing. Strings, obviously, are not "^ 

valid arguments. The result is floating point in FAC. 

Remember that AND and OR are the lowest in the order of 
precedence table. Many program logic bugs concerning these state- 
ments can be traced if you remember this. 

Table 8-S. AND /OR Tiuth Table 

AND T F OR T F Resultant values 
— -I- — — -I-— 

TTF TTT -1 = TRUE 

FFF FTF = FALSE 



SDOIG COMPAR 

Compare numerics or strings. 

Also used for BASIC <, =, >. 

This routine compares floating point numbers by calling 
CMPFAC at 56411 ($DC5B), and compares stiings using the next 
routine. The floating point result is left in FAC and in .A : O=not 
equal; — l=equal. 

String comparisons also set .X as 0, 1, or 2, indicating that the 
left-hand operand is greater, equal, or less. 

53294 $D02E CMPST 

Compare strings. 

Strings are compared and the floating point result is left in FAC: 
=not equal; — 1 = equal. 

S3377 SDOBl DIM U 

BASIC DIM. 

This calls the next routine to create each dimension specified. > , 

For example: DIM A(3),L$(8),G(9) would call the EVLVAR routine U 

three times, once for each dimension. 

Remember that the zero element of a dimension exists, takes up 
space, and may be used like any other element. \ | 

Also consider the push-up of arrays that must be done each 
time a new scalar variable, including strings, is newly defined. This 
may be avoided by defining all scalar variables before defining j i 
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' ' arrays. See the discussion at location 45-46 ($2D-2E) for details. 

An array will automatically be DIMed to 11 elements (DIM 

rn X(10)) if an element is referenced before the DIM statement is 

' ' encountered. This can cause a REDIM'D ARRAY message if the DIM 

is later encountered. Also keep in mind that a DIM statement should 

f— ( not be put within a loop. 

! ! A BAD SUBSCRIPT message is issued if the subscript exceeds 

the DIM size. 

Because of the unique way that arrays are stored in BASIC, you 
can cause BASIC to reclaim the space taken by all arrays by includ- 
ing the following instructions: 

POKE 49,PEEK(47): POKE 50,PEEK(48) 

This program line causes the array storage pool to be ignored by 
instructing BASIC that the end of arrays is the same location as the 
end of scalar variables. 

See Appendix B for a description of the internal format of 
BASIC storage of variables. 

S3387 $D08B EVLVAR 

Locate or create variable. 

The variable name is checked for proper syntax. Locations 13 
($D; type of variable) and 14 ($E; numeric variable type) are set to 
indicate the qualities of the variable. Location 16 ($10) is set for an 
FN or subscripted variable. Next, the name of the variable is saved 
in location 69-70 ($45-46) with the appropriate high-order bit 
settings to denote the variable type. 

If the variable is an array, the routine ARY is called. Otherwise, 
the next routine is called to locate the variable. 

Appendix B has a description of the variable formats in storage. 

53479 $D0E7 FNDVAR 

Locate the variable. 

The variable specified in location 69-70 ($45-46) is searched for, 
P_^ beginning where the pointer to the start of variables specifies. This 

: i pointer is at 45-46 ($2D-2E). The variable is searched for up to the 

location indicated by the arrays start pointer, which is at 47-48 
_ ($2F-30). 

If the variable cannot be found, the routine MAKVAR at 53533 
($D11D) is called to create the variable. 

If the variable is found, the routine RETVP 53637 ($D185) is 
called to create a pointer to the variable. 



53523 $0113 CHRTST 

Check if ASCII character is alphabetic. 
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This routine is used when checking the variable name for proper 
syntax to insure that the first character is alphabetic. It's also used by 
many other routines to perform an alphabetic test. 

53533 SDUD MAKVAR 

Create new variable. 

This tests the variable name for TI, TI$, or ST, and issues a 
SYNTAX ERROR message if the user is trying to create a variable 
with any of those names. 

It calls for the relocation of any arrays to a location seven bytes 
upward to allow the creation of a seven-byte variable descriptor. The 
routine that moves the arrays upward is MAKSPC, at 50104 
($C3B8). ARYTAB (array starting pointer) at 47-48 ($2F-30) is then 
reset, and the seven-byte variable descriptor is created. This routine 
then falls through. 

53637 SDISS RETVP 

Return the address of the found or created variable. 

The address of the variable is stored in location 71-72 ($47-48), 
the pointer to variable. This points to the byte just after the two- 
character name in the variable descriptor, but location 95-96 ($5F- 
60) points to the start of the variable descriptor. 

53652 $0194 ARYHED 

Calculate the length of an array descriptor. 

This routine adds five (two-byte name, two-byte total size, one- 
byte number of dimensions) to the number of dimensions specified, 
multiplied by two, to obtain the length of the needed array 
descriptor. 
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53669 $D1A5 MAXINT 

Maximum integer value of 32768 in floating point. 

Expressed as $90 80 00 00 00. 

53674 SDIAA INTIDX 

Convert floating point to two-byte fixed point in .A and .Y. 

This is used for subscript conversion as well as other tasks. 
It calls the routine MAKINT at location 53695 (DIBF) to convert LJ 

floating point to an integer, and returns the value in .A and .Y. 

53682 $0182 6ET8U8 ^ 

Convert an expression to integer number. 

Used for subscripts and other fixed expressions, this routine calls 
FRMEVL at 52638 ($CD9E) to evaluate the expression, displays an [_) 
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ILLEGAL QUANTITY message if the number is negative, and falls 
through to the next routine. 

n S3695 SDIBF MAHNT 

Convert floating point to signed integer. 

PI This routine calls FPINT 56475 ($DC9B) to convert floating 

point to integer. 

53713 SDIDI ARY 

Find an array item or create an array. 

The stack is loaded with the description of the array variable, 
GETSUB 53682 ($D1B2) is called to resolve subscript expressions, 
and the array is searched for in the area bounded by the pointers to 
the start of arrays at 47-48 ($2F-30) and to the end of arrays at 49- 
50 ($31-32). 

If the array is found, this routine jumps to ARY2 at 53837 
($D24D) for testing of the subscript value. Otherwise, a jump is 
made to ARY6 at 53857 ($D261) to create the array. 



53829 $D245 

Display BAD SUBSCRIPT message. 

53832 $D248 ILQUAN 

Display ILLEGAL QUANTITY message. 



53837 $D24D 

Found the array, check the subscript range. 

This checks to see whether the subscripts are within the size of 
the array; it branches to one of the above message routines if not. It 
also checks for redimensioning of an array. 

If another DIM is specified with a different number of sub- 
scripts, this routine issues a REDIM'D ARRAY error message. 

This then jumps to ARY14 at 53994 ($D2EA) to retrieve a 
particular elemerrt of an array. 



53857 $0261 

Create an array. 

This routine calls two routines: ARYHED at 53652 ($D194) to 
calculate the size of the array descriptor needed and RAMSPC at 
50184 ($C408) to insure the availability of enough memory for the 
array. It also creates the array descriptor and calls M16 54092 
($D34C) to calculate the array size when creating a multidimension 
array. The pointer to the end of arrays at 49-50 ($31-32) is adjusted. 
Finally, the whole of the new array is initialized to zeros. 
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53994 $D2EA ARYM 

Locate a particular array element. 

This checks the range of the subscript and the number of sub- 
scripts specified. It calculates the address within the array descriptor 
of the needed element and returns the address of the element in 
location 71-72 ($47-48). The routine M16 at 54092 ($D34C) is called 
to calculate the dimension size when locating elements in a 
multidimension array. 

54992 $0349 MI9 

Compute multidimension array size. 

Ml 6 multiplies the size of the current dimension by the size of 
the next dimension in an array. 

54141 $0370 PRE 

BASIC FRE. 

This routine calls for garbage collection and calculates the free 
area size. 

See the garbage collection routine at 54566 ($D526). Garbage 
collection can also be triggered by any request for scalar variable 
space, string space, or array space when there's not enough room to 
satisfy that request. The routine RAMSPC 50184 ($C408) is usually 
responsible for calling for garbage collection when it detects that. 

An interesting fact is that a string argument (FRE(XYZ)) causes 
the temporary string of XYZ to be purged before garbage collection 
is done. Garbage collection always processes the string storage 
stacked pointers. 

The FRE calculation is done by subtracting the pointer to the 
end of arrays at 49-50 ($31-32) from the pointer to the bottom of 
arrays at 51-52 ($33-34), with the result placed in .Y and .A. The 
routine falls through to the next routine. 

54191 $0391 MAKFP 

Convert .Y (LSB) and .A (MSB) integer to floating point. 

This routine actually sets up the conversion and calls INTFPl 
56388 ($DC44) to do the actual work. 

The reverse conversion is done by FPINT at 56475 ($DC9B). 



54174 $039E 

BASIC POS. 

Calls the CPLOT* vector at 65520 ($FFFO) to get the position of 
the cursor, then calls the routine MAKFP 54161 ($D391) to convert it 
to a floating point number. 

The expression within parentheses is ignored. 
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The contents of location 211 ($D3), the cursor position on logi- 
cal screen line, are retrieved and converted to floating point. You 
could do the same with PS=PEEK(211). 

POS is not for the printer, since it is based upon the current 
cursor position. 



$D3A6 NODIRM 

Check if a statement is entered in direct mode. 

The routine MAIN sets location 58 ($3A) to 255 ($FF) when 
input from the keyboard is received without a line number. 

This routine checks that location and displays an ILLEGAL 
DIRECT message if that is the case. 

This is called by any other routine that prohibits direct mode 
commands. 

54190 $D3AE UNDEF 

Issue an UNDEF'D FUNCTION message for EVALFN ($D3F4). 

The FN that was specified has not been defined by a previous 
DEF FN statement. 

54195 $D3B3 DEF 

BASIC DEF. 

This routine calls FN at 54241 ($D3E1) to check the syntax and 
create the descriptor for the function. The routine NODIRM at 54182 
($D3A6) is called to eliminate direct mode. More syntax checking is 
done, and this routine pushes the following onto the stack: garbage 
byte, the dependent variable's address (in DEF FNXX(A)=2*B, A is 
the dependent variable), and the address of the DEF in the line. 

The definition is skipped (not to be syntax checked till it is 
actually used in an expression) by calling BUMPTP at 51448 
($C8F8), and a jump is made to EVFN3 54351 ($D44F) to build the 
descriptor for the function. 

When a syntax error is discovered in a DEF FN statement, it will 
be flagged as an error within the calling FN statement. 

Even though the DEF statement must fit on one line of BASIC, 
you can chain them in the following manner: 

DEF FN A1(X)=6250/(M*(68-I-LL)) 

DEF FN AO(X)=COS(FNA1(-X))+(FI/FN) 

The above example illustrates how one function can be extended by 
including another. The program could issue Y=FN A0(312) to access 
the combined function definition. 

DEF FN must be encountered before any use of the function by 
FN statements. Otherwise, an UNDEF'D FUNCTION error message 
is issued. 
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The dependent variable's contents will not be changed by the 
execution of the function; see the EVALFN ($D3F4) routine 
description. 

When a program issues LOAD for a shorter program, the DEF 
FN variables need to be redefined since the variable points to the 
program line containing the DEF FN statement in the old program. > , 

See Appendix B for a description of the internal format of i I 

BASIC statements and DEF FN variables. 

Also refer to "User-Defined Functions: Defined," by Myron 
Miller, in the September 1982 issue of COMPUTE!. 



S4241 $D3E1 FN 

Check DEF FN and FN syntax. 

This routine insures that an FN token follows the word DEF and 
evaluates the syntax of the name of the function, which must follow 
floating point variable naming conventions. It calls the variable loca- 
tion/creation routine EVLVAR at 53387 ($D08B) to cause the vari- 
able descriptor to be found or created for the function. 

54260 $D3F4 EVALFN 

BASIC FN. 

This routine calls the FN routine at 54241 ($D3E1) to check the 
syntax of the FN statement and to obtain the address of the function 
descriptor. It also causes the expression within parentheses 
(FNXX(AB*C)) to be evaluated by PAREXP 52977 ($CEF1), and 
stacks the contents of the dependent variable to preserve the current 
value. In DEF FN NA(X)=3*X, X is the dependent variable. The rou- 
tine then uses the dependent variable descriptor area in the variable 
pool as a work area to hold the floating point number obtained by 
evaluating the expression on the right side of the = sign in the DEF 
statement. The final result is placed in FAC, and the dependent vari- 
able is restored from the saved contents previously stacked. The rou- 
tine then falls through to the next routine. 

Expression evaluation determines when to call this routine. 
You'll notice that FN is not in the function or ke5rword dispatch vec- j | 

tor table. ' — ' 

S43S1 $D44F EVFN3 

Store DEF FN values into the function descriptor from stack. 1_J 

54373 $0465 STR 

BASIC STR$. |_J 

This routine insures that the parameter given is numeric, calls 
FLTASC 56797 ($DDDD) to convert FAC to ASCII, and then calls 
MAKSTR 54407 ($D487) to create the string. [J 
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54389 $0475 

Calculate new string length and vector. 

Passing a pointer to the new string, this routine calls ALCSPC 
54516 ($D4F4) to allocate memory space for a string. 

When finished, FAC contains the string length in location 97 
($61) and the next two bytes contain a pointer to the string. 



54407 $0487 

Scan and set up string. 

This routine finds the end of the string, calculates the length of 
the string, and calls ALCl 54389 ($D475) to allocate memory space 
for the stiing. It then calls XFRSTl 54920 ($D688) to save the string 
in memory or checks the temporary string stack at location 22 ($16) 
to insure that there is room for another descriptor. If not, it gives the 
message FORMULA TOO COMPLEX. If the string originated from 
the BASIC text buffer at 512 ($200), a temporary string stack descrip- 
tor is used to point to the string in the BASIC program. 

Many routines, such as PRINT, INPUT, READ, STR$, and 
expression evaluation, call this routine to perform string setup. 

54516 $04F4 ALCSPC 

Allocate memory space for a string. 

Passing the amount of space needed for a string, this routine 
checks that there is space available in free memory and adjusts the 
pointer to the bottom of active strings at location 51-52 ($33-34) to 
accommodate the string. If space is not available, GRBCOL is called, 
and the memory allocation is tried again. If still not available, the 
OUT OF MEMORY message is issued. 

54566 $0526 6R8C0L 

Garbage collection. 

Each time a string is redefined (changed in any way, including 
concatenating with +), the string is actually rebuilt in the string area 

r~[ at the high-end memory. Garbage collection is the process of scan- 

' ' ning all the string descriptors in the variable pool, temporary string 

stack, and arrays; finding the string that is still in use that is at the 
highest location in memory; and moving it as high as possible in the 
string storage area. Then all the descriptors are scanned again for the 
next highest in-use string to be moved to the highest unused area of 
the string pool. This continues through all the string descriptors, 

{ I until all in-use strings have been pushed upwards, overlaying any 

discarded strings. 

Any strings that have a length of zero in the descriptor are 

j^ ignored and will be recreated if referenced again. Then the pointer at 
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51-52 ($33-34) is adjusted to reflect the new bottom of active 
strings. 

During all this collection time, the STOP key is not checked. 

In the article "Learning about Garbage Collection," by Jim 
Butterfield, in the March 1981 issue of COMPUTE!, an important set 
of conclusions was demonstrated: Garbage collection will scan all the 
string descriptors and repack the strings whether any have been 
abandoned or not. A collection immediately after a collection will 
still require the same activity twice. Strings that are part of a pro- 
gram line or DATA line don't affect the collection time. Abandoned 
old strings don't take much time during collection — only those that 
are kept cost time. Collection time is proportional to the square of 
the number of strings manufactured using concatenation, RIGHTS, 
MID$, LEFT$, and so on. 

S4717 SOSBD GC0U3 

Check if most eligible string to collect. 

This routine is called by the garbage collect routine described 
above to determine if the current string is at the highest memory 
location. 

54790 $0606 COLECT 

Garbage collect a string. 

This is called by the garbage collect routine GRBCOL to move 
the string to high string memory and update the descriptor to point 
to its new location. This routine then calls the routine MOVEBL 
50111 ($C3BF) to actually move the string. 



5484S $0630 

BASIC +, concatenate string. 

The ADDSTR routine checks the length of the combined string 
and issues a STRING TOO LONG message if needed. It then calls 
ALCSPC 54516 ($D4F4) to allocate space for the combined length, 
calls XFERSTR at 54906 ($D67A) to build the new string in the new 
area, and calls for the deletion of the old temporary or permanent 
strings. 



$067A XFER8TR 

Move string in memory. 

This is a utility subroutine called by several other routines to 
move a string from one point to another. 

Location 53-54 ($35-36) is used as a pointer to the target loca- 
tion and location 34-35 ($22-23) as a pointer to the source string. 
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54947 $D6A3 DELST 

Discard a temporary string. 

I 1 The pointer to the string descriptor is passed to this routine in 

location 100-101 ($64-65). 

This routine calls the DELTSD 55003 ($D6DB) routine. 

ri If the string descriptor is on the temporary string stack, the rou- 

tine is not interested in reclaiming it, but saves a pointer to the 
actual string in location 34-35 ($22-23). If the string is not on the 
temporary stack and is the very last string in the string storage area, 
the pointer to the bottom of active strings at location 51-52 ($33-34) 
is moved up the length of the string to deallocate it. 

This routine is called by several other routines. One reason it's 
called by so many others is that it conveniently takes a pointer to a 
string descriptor and returns a pointer to the actual string in location 
34-35 ($22-23), with the length of the string left in .A. 

55003 SDSDB DELTSD 

Clean up the temporary string descriptor stack. 

If the pointer to the string descriptor that the routine receives is 
pointing into the temporary string descriptor stack, the descriptor is 
deleted. See location 22-24 ($16-18). 

55020 SDSEG CHR 

BASIC CHR$. 

Creates a descriptor on the temporary string stack for the newly 
created one-byte string with the value specified in the argument. 

55040 $0700 LEFT 

BASIC LEFT$. 

This routine calls the routine FINLMR at 55137 ($D761) for 
parameters and creates a temporary string descriptor with the left- 
hand amount of the string specified. It will not extend the string. 

55004 $D72C RIGHT 

BASIC RIGHTS. 

Calls FINLMR 55137 ($D761) for parameters and uses a com- 

nplemented position parameter to allow the routine LEFT at 55040 
/iC 1 1 Villi \ ^t-i 'rS4^**fi^*»r%^ i^et ■t'^ol^ 



($D700) to perform its task. 



55095 $0737 

BASIC MID$. 

This routine calls FINLMR at 55137 ($D761) for parameters, 
r-| checks for a zero length string (ILLEGAL QUANTITY), and the 
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begin and end points are calculated, with the default of the end of 
the string if the length is not specified. LEFT 55040 ($D700) is given 
the task of actually doing the extraction and building of the new 
string. 



$0761 FINLMR 

Obtain string parameters for LEFT$, MID$, and RIGHT$. 

The first two parameters for these string functions are pulled 
from the stack and stored in work areas. 



$D77G LEN 

BASIC LEN$. 

This calls GSINFO 55170 ($D782) to obtain the length of the 
string, then calls MAKFP at 54161 ($D391) to convert it to a floating 
point number. 

The string contents are not counted directly, and the length 
parameter of the descriptor is used. 

5S170 $D782 GSINFO 

Get string information. 

GSINFO is called by the BASIC commands ASC, LEN, and VAL 
to obtain the length of the string and a pointer to the string in loca- 
tion 34-35 ($22-23). This routine calls DELST 54947 ($D6A3) to 
obtain the information. 

55170 $0780 ASC 

BASIC ASC. 

This calls GSINFO 55170 ($D782) to obtain the pointer to the 
string; only the first character is converted to floating point by a call 
to MAKFP 54161 ($D391). 

An ILLEGAL QUANTITY message is issued if the length of the 
string is 0, as in X$=""; youTl see recommendations for using 
X=ASC(X$-l-CHR$(0)) to overcome this problem. 

Readability of the program can be increased by using this func- . 

tion. For instance, POKE 7,58 is not as clear as POKE 7,ASC(:). LJ 

The reverse of ASC is CHR$, not STR$. 

55185 $0700 GETOYT \j 

Obtain number 0-255. 

A one-byte parameter is obtained by evaluating the expression 
and checking that it reduced to the range 0-255. j | 

This routine calls GETSUB 53682 ($D1B2) to convert the result 
to a positive integer. This type of value is used by POKE and WAIT 
where the value cannot exceed the storage range of a single byte. j i 
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S5213 $D7AD VAL 

BASIC VAL. 

n String information is obtained from GSINFO at 55170 ($D782), 

CHRGET is used to scan the string after the previous TXTPTR is 
saved, and ASCFLT 56563 ($DCF3) is caUed to him the ASCII 

I I numeric values into a floating point number. Sign characters, deci- 

mal points, exponentiation, and spaces are all valid. The first illogical 
character, including a second decimal point, terminates the VAL 
function, but the expression may contain other function calls (for 
example, VAL(MID$(B$,6,8))). 

When the length of the argument is 0, the returned value will 
also be 0. 



$D7EB GETAD 

Get two parameters for POKE and WAIT. 

A two-byte address is made into an integer in location 20-21 
($14-15) by a call to the routine MAKADR at location 55287 
($D7F7), and a one-byte (0-255) parameter is obtained by a call to 
the GETBYT routine at 55195 ($D79B) and left in .X. 

SS287 $D7F7 MAKADR 

Convert floating point FAC to two-byte positive integer. 

The range and sign of FAC are checked and an ILLEGAL 
QUANTITY message is issued if negative, or greater than 65535. 
This routine calls the routine FPINT 56475 ($DC9B) for the actual 
conversion, and stores the result in location 20-21 ($14-15). 

This routine is used by the SYSTEM (SYS), PEEK, and GETAD 
routines. 

55300 $0000 PEEK 

BASIC PEEK. 

This routine uses the address developed by MAKADR, picks up 
the byte of data at that address, and calls the routine MAKFP at 
r~| location 54161 ($D391) to convert it to a floating point number. 

55332 $0024 POKE 

^ BASIC POKE. 

' The target address is developed by the GETAD routine; it also 

hands back the value in .Y for POKE to place at that address. Thus 
j— I POKE is rather short. 

n 
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$0020 WAIT 

BASIC WAIT. 
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Two parameters are obtained from calling the GETADR routine 
55275 ($D7EB), and a third is obtained or defaulted to zero by this 
routine. The second parameter is stored in location 73 ($49) and the i 1 

third in 74 ($4A). The contents of the address are exclusive-ORed i — I 

with the third parameter and ANDed with the second; it then loops 
until the result is not zero. — 

See locations 197 ($C5), 653 ($28D), and 37137 ($9111) for U 

examples of the use of the WAIT instruction. 

Another reference is "All About Commodore's WAIT Instruc- 
tion," in the January 1983 issue of COMPUTE!, by Louis Sander. 

5S369 $0849 ADD05 

Round FAC by .5. 

This routine adds .5 to FAC by setting .A and .Y with .5 and 
calling part of the routine PLUS at location 55399 ($D867). This rou- 
tine, in turn, is called by FLTASC 56797 ($DDDD) when converting 
a floating point number to TI$ or to an ASCII string. This is also 
called by the routine SIN, location 57960 ($E268). 

55376 $D8S0 LAMIN 

Subtract memory contents from FAC. 

This loads a floating point number in memory to FAC2 and falls 
through to the next routine. 

55379 $0853 SUD 

BASIC - (subtract). 

This routine subtracts FAC from FAC2, the result placed in FAC. 
This is accomplished by complementing the sign and jumping to the 
routine PLUS 55402 ($D86A). 

55394 $0862 PLUSl 

Perform exponent preshifting (?) and fall through. 

This routine apparently requests that the exponent be 
denormalized prior to the mathematical function until both numbers : 

have equal exponents. I I 

The routine called to perform this is ASRRES at location 55683 
($D983). 

See Appendix B for an explanation of normalization of floating [_J 

point numbers. 

55399 $0867 LAPLU8 

Add memory contents to FAC. 

This loads a floating point number in memory to FAC2 and falls 
through to the next routine. jj 
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SS402 $D86A PLUS 

BASIC + (add). 

n The PLUS routine adds the contents of FAC2 to FAC, falling 

through to the next routine if the result is negative, or skipping to 
the routine NORMLZ 55550 ($D8FE) if it is not negative. 

n 



$D8A7 PLUS6 

Make the result negative if a borrow was done. 

This routine readjusts the exponent so that the resulting FAC is 
negative. Entry points at $D8D2 and $D8D7 are used by many 
routines to convert simple numbers that have plugged into FAC by 
these routines into floating point. 

5S543 $D8F7 ZERFAC 

Zero out FAC and make sign positive since result was zero. 



SDSFE NORMLZ 

Renormalize the FAC result. 

Add any fractions and normalize the result in FAC. 

55623 $D947 COMFAG 

Complement FAC entirely. 

This routine changes FAC into the two's complement form by 
reversing the bits with EOR ($FF) commands, and adding one. 

55678 $D97E OVERFL 

Issue OVERFLOW message and exit. 

55683 $0983 ASRRES 

Perform exponent preshifting (?) and fall through. 

This routine apparently performs exponent denormalization 
prior to mathematical function until both numbers have equal 
exponents. 
P~j This is called by the following routines: 

T1MES3 ($DA59) 
_ FPINT ($DC9B) 

11 PLUS ($D86A) 

55740 $0980 FPGl 

r~| Constant of one for a floating point accumulator. 

$81, 00, 00, 00, 00 

This constant is also used by FOR as a default STEP stack entry. 
n This value is ORed in the second byte with 128 ($80) at 56251 

($DBBB) when loaded into the accumulator. 
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55745 $D9C1 LOGGON 

Constants for LOG function. 



Table 8-8. 


li8G Constants 




Constants 




Floating Point Representation 


3.0 




$03 


0.434255942 




$7F,5E,56,CB,79 


0.576584541 




$80,13,9B,0B,64 


0.961800759 




$80,76,38,93,16 


2.885390070 




$82,38,AA,3B,20 


0.5 * SQR(2) 




$80,35,04,F3,34 


SQR(2) 




$81,35,04,F3,34 


-0.5 




$80,80,00,00,00 


LOG(2) 




$80,31,72,17,F8 


55786 


$D9EA LOG 


BASIC LOG. 







Calculation of LOG to base e of FAC to FAC, using the values at 
LOGCON at location 55745 ($D9C1). 



$DA28 TIMES 

BASIC * multiplies FAC2 by FAC, leaving the result in FAC. The 
routine T1MES3 55897 ($DA59) is called once for each mantissa 
byte-pair. 
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$DA59 TIMES3 

Multiply-a-byte subroutine. 

This adds a mantissa byte the number of times specified in .A. 

55948 $DA8C LODARG 

Move floating point memory locations to FAC2. 

.A and .Y point to the four bytes of memory that contain a 
three-byte mantissa, plus a sign byte. 

55091 $DAB7 MULDIV 

Add exponents of FAC and FAC2. 

This routine stores the sum of FAC and FAC2 exponents in FAC U 

exponent, testing for an OVERFLOW error. 

56034 $DAE2 MOLTEN Q 

Multiply FAC by 10. 

MULTEN is a subroutine called v^hen converting floating point 
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56272 



to an ASCII value, for example TI$. The PLUS routine 55402 
($D86A) is called to do the task. 



+10 floating point constant: $84,20,00,00,00. 

56062 SDAFE 

Divide FAC by 10. 

The routine DIVIDE at location 56082 ($DB12) is called to do 
the work. 

56079 SOBOF LADIV 

Move floating point in memory to FAC2. 

In preparation for division, this loads FAC2 from memory 
location. 

56082 $DB12 DIVmE 

BASIC / (Divide FAC2 by FAC resulting in FAC). 

Before performing the divide operation, a check for DIVISION 
BY ZERO is made. 



Move floating point memory into FAC. 

This is called by other routines to load a floating point number 
pointed to by .A and .Y into FAC. 

56263 $DBC7 FAGTF2 

Move FAC to memory. 

This routine is called to store a floating point number into mem- 
ory location 92-96 ($5C-60), part of TEMPF3. 

56266 SDBCA FAGTFl 

Move FAC to memory. 

r~] FACTFl is called to store a floating point number into memory 

' ' location 87-92 ($57-5B), part of TEMPF3. The second byte of the 

value to be loaded is ORed with 128 ($80) when loading the Hoat- 
^ ing Point Accumulator. 

56272 $0BB0 FAGTFP 

Move FAC to memory. 

This is called to store a floating point number into memory, at 
the location pointed to by 73-74 ($49-4A). 



229 



u 
u 



$DBD4 STORFAG ^ 

Perform move of FAC to memory. 

The above routines fall through to this routine to actually I f 

accomplish the storing of FAC to memory, now pointed to by .X and 
.Y. This routine uses the first two bytes of location 34-37 ($22-25) 
as a pointer to the target location. Pl 

S6316 SDBFC ilTOF 

Transfer FAC2 to FAC. 

This is a loop that transfers five bytes from FAC2 to FAC; the 
sixth byte (sign) is forced to be positive by storing a zero in it. 



SDCOG RFTOA 

Move FAC to FAC2, with rounding. 

This calls the routine ROUND 56347 ($DC1B) and then falls 
through. 



SDGOF FTOA 

Move FAC to FAC2, without rounding. 

FTOA moves six bytes (the full exponent, mantissa, and sign) of 
FAC to FAC2. 

56347 SDGIB ROUND 

Round FAC by adjusting the rounding byte. 

Location 112 ($70) is doubled, and if now greater than 128 
($80), a one is added to the FAC. 

56363 $DC2B SGNFAC 

Test the sign of FAC. 

On exit, .A=0 if zero; 1 if positive; or 255 ($FF) if negative. 

56377 $DC39 8GN 

BASIC SGN. 

This calls the routine SGNFAC 56363 ($DC2B) then falls U 

through. 

56360 $DG3G IIITFP [j 

Convert the sign obtained above to or —1 in FAC. 

If entered without falling through from SGN 56377 ($DC39), 

this routine converts .A to floating point in FAC. |_J 
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n 56388 $DG44 INTFPI 

Convert a two-byte integer to floating point in FAC. 

I~] The number in location 98-99 ($62-63) is converted into FAC. 

56408 SDCSS ABS 

p BASIC ABS. 

The FAC sign byte at 102 ($66) is shifted right one bit to 
remove any negative sign. The high order bit equals 1 when neg- 
ative; when positive. 

56411 $DG5B CMPFAC 

Compare FAC to memory. 

.A and .Y point to the five-byte memory location to be com- 
pared with FAC. Afterward, .A=0 if equal; 1 if the memory location 
is less than FAC; and 255 ($FF) if the memory location contains a 
number greater than FAC. 

The routine SGNFAC 56363 ($DC2B) may be called. 

56475 SDGSB FPINT 

Convert FAC floating point to signed integer. 

The resulting four-byte integer is left in 98-101 ($62-65). Rou- 
tine INTFPI 56388 ($DC44) converts a two-byte integer into floating 
point. 

56524 SBCCC INT 

BASIC INT. 

FAC is rounded down to an integer in floating point format. The 
result is four bytes in locations 98-101 ($62-65). This routine is 
called by many functions requiring an integer in floating point 
format. 

Sometimes INT will round a number downward. This could be 
avoided by INT(X-l-.5); however, if X is a negative number, this 
would round it down, making it a greater value. To correctly round 
negative or positive numbers, use SGN(X)*INT(ABS(X)+.5). 

56553 $BGE8 FILFAC 

store the contents of .A in locations 98-101 ($62-65). 
Used to zero out the locations. 



56563 $0GF3 A8GFLT 

Convert an ASCII string to a floating point number in FAC. 

This is called by VAL to evaluate and convert the stiing, allow- 
ing +, -, E, spaces, and a decimal point in the stiing. Note that 
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$DDB3 FPG12 

String to floating point conversion constants. 

Table 8-7. String to Floating Point Constants 

Constants Floating Point Representation 

99,999,999.9 $9B,3E,BC,1F,FD 

999,999,999.25 $9E,6E,6B,27,FD 

1,000,000,000.0 $9E,6E,6B,28,00 



56770 $DDC2 

Issue message IN. 

.A and .X are loaded with the contents of location 57-58 ($39- 
3A), then fall through to the next routine. 



Decimal number display routine. 

An integer number (.A*256+.X) is converted to floating point in 
FAC. The routine FLTASC 56797 ($DDDD) is called to convert the 
number to a string, and the routine PRTSTR 51998 ($CB1E) is called 
to print the number. This routine can be called from a machine lan- 
guage program. 



PRINT 
PRTFIX 
STR 
FACT12 


51872 
56781 
54373 
53032 


$CAA0 
$DDCD 
$D465 
$CF28 


57105 SDFll 

0.5 constant for rounding and SQR, 

$80,00,00,00,00 
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location 95 ($5F) is used as a switch to indicate that a decimal point L) 

has already been processed. 



$D07E ASCIO U 

Add .A to FAC. 

Part of the ASCFLT routine at 56563 ($DCF3), this adds .A to p 

FAC by calling other routines. | | 



$0000 FLTASC 

Convert FAC to TI$ or an ASCII string. 

A fairly long and involved routine. A work area at 256-270 
($100-10E) is used and the result is left in that area. \_j 

This routine is called by several others: 

Li 
u 
U 
U 
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S7110 sons 

Powers of 10 table, in four-byte fixed integer format 

This is used for converting strings 



Constant 


Fixed Integer Representation 


-100,000,000 


$FA,0A,1F,00 


+ 10,000,000 


$00,98,96,80 


-1,000,000 


$FF,FO,BD,CO 


+ 100,000 


$00,01,86,A0 


-10,000 


$FF,FF,D8,F0 


+ 1,000 


$00,00,03,E8 


-100 


$FF,FF,FF,9C 


+ 10 


$00,00,00,0A 


-1 


$FF,FF,FF,FF 



$DF3A HMSCON 

Constants for TI$ division conversion, in four-byte fixed integer 
format. 



Constant 


Fixed Integer F 


60*60*60*10 


$FF,DF,0A,80 


+60*60*60 


$00,03,4B,C0 


-60*60*10 


$FF,FF,73,60 


+60*60 


$00,00,0E,10 


-60*10 


$FF,FF,FD,A8 


+ 60 


$00,00,00,3C 



n 
n 

n 



57170 $DFS2 

Unused area, filled with $BF,AA,AA,AA,AA,AA,AA,AA,AA,., 



$DF71 



SQR 



S720I 

BASIC SQR. 

This moves FAC to FAC2, loads FAG with 0.5, and falls 
through. 

57211 $DF7B EXPONT 

BASIC t (up arrow/power). 
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This routine calculates FAC2 to the FAC power, resulting in 
FAC. It calls LOG 55786 ($D9EA) for FAC2, which is multiplied by 
FAC and calls EXP 57325 ($DFED). 

57268 $DFB4 NEGFAC 

BASIC monadic — 

Negate FAC by exclusive ORing the sign byte with a constant of 
255 ($FF). Zero is left unchanged. 
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SDFBF EXPGON 

Table for EXP, in floating point format. 

Used to calculate 2 to the N power. 

Table 8-8. LOG and EXP Constants 

Constant Floating Point Representation 

1/L0G(2) $81,38,AA,3B,29 

7 $07 count of values 

.0000214987637 $71,34,58,3E,56 

.000143523140 $74,16,7E,B3,1B 

.00134226348 $77,2F,EE,E3,85 

.00961401701 $7A,1D,84,1C,2A 

.0555051269 $7C,63,59,58,0A 

.240226385 $7E,75,FD,E7,C6 

.693147186 $80,31,72,18,10 

1.0 $81,00,00,00,00 

57325 GDFED EXP 

BASIC EXP. 

The value in FAC is multiplied by l/LOG(2), converted to an 
integer, and the table at 57279 ($DFBF) is applied to calculate e 
(2.718281828) to the power of FAC, and left in FAC. EXP is the 
reverse function of LOG. For EXP(X), the same results can be 
achieved by 2.7182818 t X. 

Excessive negative numbers will be set to by this routine, j [ 

while arguments over about 88 will receive the OVERFLOW error 
message. 

Location Range: 57344-53527 <$E0G0-$E48F) 

BASIC Spillover into Kernal ROM _ 

BASIC spills over into this 8K ROM area up to location 58527 Li 

($E49F)— occupying a total of 1183 bytes. RND, SYS, OPEN, 
CLOSE, LOAD, SAVE, VERIFY, additional trigonometic functions. 
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57492 



and BASIC initialization routines take up the bulk of this 1K+ 
space. 

The remainder of the 8K area contains the routines of the VIC's 
Kernal operating system. The Kernal handles all the I/O devices, 
including the screen and keyboard, and provides routines that 
BASIC and machine language can use to communicate with these 
devices. 

57408 $E040 SEREVL 

Series evaluation subroutine. 

This calls the next routine to accomplish the evaluation of com- 
plex trigonometric functions. A pointer is passed to this routine. This 
pointer is stored in location 113-114 ($71-72) and is known as the 
series evaluation pointer. It points to the table of constants for the 
trigonometric function being evaluated by the evaluation routines. 
This pointer will specify a location v«thin the tables at 58171 
($E33B), 55745 ($D9C1), 57284 ($DFC4), or 58092 ($E2EC). See 
those constant tables and the routines around these locations for fur- 
ther information. 



57430 $E056 

Math series evaluation routine. 

This routine computes polynomials based upon the table pointer 
passed to it. This table pointer is stored in location 113-114 ($71- 
72). The initial pointer passed to this routine points at the number of 
table entries to be processed, which is followed by the table values. 

SER2 multiplies and adds the coefficients to FAC to complete 
the calculation. 

57482 SEOOA RNDGI 

Table of constants for RND. 

This contains two floating point format numbers to use when 
the argument passed to the BASIC command RND is a positive 
number. 
f^ The first number is used to multiply the last seed by 

11,879,546.4 ($98,35,44,7A,00); the second number, 
.0000000392767778 ($68,28,61,46,00), is added to the result. 

n S7402 $E0S4 RND 

BASIC RND. 

r-| See the discussions at location 139 ($8B) and 57482 ($E08A) for 

' ' details of the RND function. 

n 
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$E0F6 

BASIC patch routines. 

These routines are apparently inserted here to invoke CLR when 
RS-232 is opened, and to display an error message if a called Kemal 
routine returns with the carry bit set. BREAK is assumed if the carry 
bit is set, but the error message number is zero. 

A BASIC routine will call these routines rather than calling the 
Kemal routine directly or with indirect vectors. This adds yet another 
level of calls for Kemal routines, but also facilitates further changes; 
only one routine in BASIC needs to know the proper address for 
these Kemal calls. 

The patch routines handle calls to the following Kemal routines: 



^ble 8-9. Calls to the Kernal 

Routine Action 

$E109 Output a character 

$E10F Input a character 

$E115 Set output device 

$E11B Set input device 

$E121 Get a character 



Jump Calls Vector 
from Default 



$FFD2 $0326 
$FFCF $0324 
$FFC9 $0320 
$FFC6 $031E 
$FFE4 $032A 



$F27A 
$F20E 
$F309 
$F2C7 
$F1F5 



A routine at $E0F6 is provided to handle the Kemal's retumed 
carry bit being set. BASIC routines that call the Kemal directly for 
functions other than the ones provided in these routines commonly 
branch to that entry point to issue the appropriate error message. 



$E127 



SYSTEM 



BASIC SYS. 

The argument expression is evaluated, then type checked and 
converted to a two-byte integer format by calling routine MAKADR 
55287 ($D7F7), which stores the result in LSB/MSB format at loca- 
tion 20-21 ($14-15). A retum address within the SYS routine is 
pushed onto the stack. Then the registers at locations 780-783 
($30C-30F) are loaded and an indirect JMP is performed off the vec- 
tor stored in location 20-21 ($14-15). When SYS is reentered by the 
RTS of the target routine, the registers are stored in the SAVE area 
of 780-783 ($30C-30F) for the next SYS to use. 

You may modify these saved registers prior to issuing SYS so 
that the correct parameters are passed. FAC, FAC2, and other loca- 
tions may need to be set, depending on the requirements of the tar- 
get routine(s). 
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n 57701 

n 

57683 $EI53 SAVE 

— BASIC SAVE. 

' ' The routine calls PARSL 57809 ($E1D1) to set the filename, 

device, and secondary address parameters. .X and .Y are loaded with 

nthe contents of locations 45-46 ($2D-2E), which is the pointer to the 
end of the BASIC program, and .A is loaded with the constant of 43 
($2B), the zero page location of the pointer to the start of the BASIC 
program. A JMP is then made to the Kemal SAVE routine via the 
vector at $FFD8. 



$E162 BVERIF 

BASIC VERIFY. 

This sets .A to 1 to indicate a VERIFY is in progress and falls 
through to the next routine, skipping one instruction. 

S770I $E165 BLOAD 

BASIC LOAD. 

The first instruction of this routine loads .A with a zero to 
indicate that a LOAD was requested. Note that this is skipped by 
BVERIF. 

The routine calls PARSL 57809 ($E1D1) to set the filename, 
device number, and secondary address parameters. .X and .Y are 
loaded with the contents of locations 43-44 ($2B-2C), the pointer to 
the start of the BASIC program area, and .A is left as 1 or to 
indicate LOAD or VERIFY. A JMP is then made to the Kemal LOAD 
routine via the vector at $FFD5. See that routine for more informa- 
tion regarding the LOAD sequence of events. 

When the Kemal is finished, VERIFY will issue OK if in direct 
mode, or VERIFY ERROR, depending on the ST setting. 

LOAD will issue LOAD ERROR regardless of whether program 
mode or direct mode is active. Otherwise, direct mode causes the 
pointer to the end of the BASIC program at 45-46 ($2D-2E) to be 
reset from the returned values in .X and .Y. The program lines are 
r-[ then rechained by calling the routine LNKPRG at 50483 ($C533). 

When LOAD is issued from a program, the current program is 
ended and the LOADed program begins execution. Only the mes- 
sage PRESS PLAY ON TAPE will be issued. No CLR is issued, so 
the existing variables are not reset. Modified or constructed string 
variables will be available, but functions must be redefined. The pro- 
gram being LOADed must not be larger than the LOADing program. 
n The commands LOAD filename,^ can be used to load/run a disk or 

tape program if the device number is omitted or if it's ,1. 



237 



u 

57787 D 



U 



S7796 $E1C4 

BASIC CLOSE. 

The routine PAROC at 57878 ($E216) is called to set the file 
number. 

This then JMPs off the CCLOS vector at 65475 ($FFC3) to 
$031C, and finally to the Kemal routine CLOSE 62282 ($F34A). 

If closing tape, an end of file byte (0) is written, and perhaps an 
I.D. 5 header, if opened with a secondary address of 2, to indicate 
end of tape. 

Disks are marked with an end-of-file marker in the last block 
(sector) when the file is closed. 

Failing to close an output file to disk can cause the file to be 
irretrievable. If FILE NOT OPEN is received when attempting to 
close it in direct mode, try OPEN 15,8,15:CLOSE 15. 
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57787 SEIBB FOPEN 

BASIC OPEN. 

The routine PAROC 57878 ($E216) is called to set the filename, 
device, secondary address, and argument expression that may be 
specified with OPEN. See that routine for more details of the OPEN ri 

command. ' — ' 

This JMPs off the COPEN* vector at $FFCO to $031 A and finally 
to the Kemal routine OPEN at 62474 ($F40A). 



Set LOAD, VERIFY, and SAVE parameters. 

This is a rather curious routine that first calls the Kemal routine 
SETNAM 65097 ($FE49), assuming that there is no filename, and 
causes the device number and secondary address to default to 1 and 
by calling the Kemal routine SETLFS 65104 ($FE50) with these 
parameters set. 

Then the routine IFCHRG 57859 ($E203) is called and retiims if 
any parameters were specified on the OPEN, VERIFY, or SAVE. 
Otherwise, the IFCHRG returns to the routine calling this routine. j j 

If this routine is reentered, it then calls the above mentioned 
routines to set the specified parameters, calling IFCHRG for each 
one, in order to exit with the default parameters as soon as there are 
no more specified. 



u 



Check whether more characters are in the current statement. U 

If a call to CHRGET indicates that more characters are in this 

statement, then return. Otherwise, retum to the routine that called j — ^ 

the calling routine. I I 
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BT887 $E20B SKPCOM 

Skip any comma in parameters being scanned. 

This routine calls the routine COMCHK 52989 ($CEFD) to do its 
work, then falls through to the next routine. 

57870 $E20E CHRERR 

Insure that a parameter is present after a delimiting comma. 

If a call to CHRGET indicates that more characters are in this 
statement, then return. Otherwise, issue a SYNTAX ERROR message. 

57878 $E216 PAROG 

Handle parameters for OPEN and CLOSE. 

This routine sets the filename, device, secondary address, and 
argument expression that may be specified with OPEN or CLOSE. 

The routine first calls the Kemal routine SETNAM 65097 
($FE49), assuming that there is no filename, and causes the device 
number and secondary address to default to 1 and by calling the 
Kemal routine SETFLS 65104 ($FE50) with these parameters set. 

Then the routine IFCHRG 57859 ($E203) is called and rehims if 
any parameters were specified on the OPEN or CLOSE. Otherwise, 
it returns to the routine calling this routine. 

If this routine is reentered, it then changes the secondary 
address (also called the command) for serial devices to 255 ($FF) and 
passes it and the device number retrieved to the routine SETLFS at 
65104 ($FE50). 

Once again, the routine IFCHRG is called and returns if any 
parameters were specified on the OPEN or CLOSE. Otherwise, it 
returns to the routine calling this routine. 

If this routine is reentered again, it calls SETLFS once again to 
pass the specified device number and secondary address. 

Finally, any specified filename is passed to SETNAM at 65097 
($FE49). 

All of this is done in this order to allow all parameters except 
the file number to be optional. 

S7853 $E26I COS 

BASIC COS. 

The cosine of FAC in radians is placed in FAC. This function 
can also be performed with SIN(X+(?/2)). This adds a constant 
value of ?/2 to the value and falls through to the next routine. 

S78G0 $E268 SIN 

BASIC SIN. 

Calculates the sine of FAC in radians. This is also used, with 
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different constant values, for COS and TAN calculations. 

This routine performs repetitive subtraction and division, using - 

the table of trigonometric constant values at 58077 ($E2DD) to |_j 
achieve the desired results. 

To convert radians to degrees, the formula is: DEG=RAD*(180/ _ 

?). DEC v»?ill have a possible range of —90 to +90 degrees. jj 

58033 $E2B1 TAN 

BASIC TAN. 

Determines the tangent of FAC in radians. 
This routine calls SIN 57960 ($E268) and COS 57953 ($E261) to 
help evaluate the expression. 

58077 $E2DD FPC20 

Trigonometric evaluation constant values used for COS, SIN, and 
TAN. 

These table values are in five-byte floating point format. 

Table 8--I0. Trigonometric Constants 



Constant 


Floating Point Representation 


?/2 


$81,49,0F,DA,A2 


?*2 


$83,49,0F,DA,A2 


.25 


$7F,00,00,00,00 


5 


counter of following values 


-14.38139 


$84,E6,1A,2D,1B 


42.007797 


$86,28,07,FB,F8 


-76.70417 


$87,99,68,89,01 


81.605223 


$87,23,35,DF,E1 


-41.34170 


$86,A5,5D,E7,28 


6.2831853 


$83,49,0F,DA,A2 


165 


$A5 (one-byte) 


58123 


$E30B ff 


BASIC ATN. 
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Determines the arctangent of FAC in radians. I I 

Simpler than other trigonometric functions, this applies the 
rather long table of constant values at ATNCON 58171 ($E33B). 

58171 $E33B ilTNCON U 

Table of constant values for ATN evaluation. 

The values are in five-byte, floating point format. 7", 

U 
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S8247 
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Table 8-11. Mm Itenstants 



Constant Floating Point Representation 

, I 12 ($B) count of following values 



-6.84793912 E-4 


$76,B3,83,BD,D3 


+4.85094216 E-3 


$79,1E,F4,A6,F5 


-.0161117018 


$7B,83,FC,B0,10 


+.0342096380 


$7C,0C,1F,67,CA 


-.0542791328 


$7C,DE,53,CB,C1 


+ .0724571965 


$7D,14,64,70,4C 


-.0898023954 


$7D,B7,EA,51,7A 


+.1109324133 


$7D,63,30,88,7E 


-.1428398080 


$7E,92,44,99,3A 


+.1999991200 


$7E,4C,CC,91,C7 


+.3333333160 


$7F,AA,AA,AA,13 


+ 1.000000000 


$81,00,00,00,00 


58232 


$E378 


Perform a cold start of BASIC. 



This routine is pointed to by the vector stored in location 49152 
($C000) COLDST*, that is branched upon as the last act of the 
Kemal during its power-on/reset routine START 64802 ($FD22), 
which the 6502 automatically jumps to via the vector stored in loca- 
tion 65532 ($FFFC). 

This routine calls three routines, resets the stack pointer to 507 
($1FB), and then jumps to READY 50292 ($C474) to display the 
READY, message. 

The three routines that are called are: 

• INITVCTRS* 58459 ($E45B), which initializes the vectors 
starting at 768 ($300). 

• INITBA 58276 ($E3A4), which initializes CHRGET and the 
page zero pointers. 

• FREMSG 58372 ($E404), which displays the messages CBM 
BASIC and BYTES FREE, then jumps to the NEW routine at 50754 
($C642). 

For more details of the functions performed, see the listed 
routines. 

A SYS 58232 will restart BASIC. 

58247 $E387 CGIMAG 

CHRGET routine and RND seed to be copied to page zero RAM. 

The CHRGET routine stored here is copied to locations 115-138 
($73-$8A) and the seed value for RND is copied to locations 139- 
143 ($8B-8F). This seed value is .811635157 ($80,4F,C7,52,58). 
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The coppng of this area to zero page is done by the routine 
INITBA 58276 ($E3A4). 



u 

u 
□ 



$E3A4 imTBA LJ 

Initialize BASIC: Restore CHRGET and page zero pointers. 

This routine is called by COLDBA* 58232 ($E378) during the T i 

cold start of BASIC. '— ^ 

The CHRGET routine is copied from CGIMG 58247 ($E387) to 
115-138 ($73-$8A); locations 0-6 are initialized as described at 
those locations; various other locations in page zero are initialized; 
and the address of the bottom of RAM is obtained by calling 
MEMBOT 65154 ($FE82), and stored in 43-44 ($2B-2C). The top of 
contiguous RAM is determined by calling MEMTOP 65139 ($FE73) 
and stored in 51-52 ($33-34) and 55-56 ($37-38); a leading zero is 
placed at the start of the BASIC program area; and one is added to 
the pointer specifying that area. The pointer is at location 43-44 
($2B-2C). 



58372 $E404 

Display cold start of BASIC messages. 

This is called by COLDBA* 58232 ($E378) during the cold start 
of BASIC. 

This calculates the amount of free space in the BASIC area by 
subtracting the start of BASIC program pointer at location 43-44 
($2B-2C) from the pointer to the end of BASIC memory at location 
55-56 ($37-38); it also displays the **** CBM BASIC V2 **** mes- 
sage, and the BYTES FREE message. These messages are located at 
CBMMSG 58409 ($E429). Finally, a jump to the NEW routine at 
50754 ($C642) is performed. 

58409 $E429 CBMMSG 

BASIC cold start messages. 

The **** CBM BASIC V2 **** and BYTES FREE messages. 

58447 $E44F BASVCTRS'' 

Six BASIC vectors to be copied to location 768 ($300). 

The INITVCTRS* routine at 58459 ($E45B) copies these vectors 
to RAM. See the description of these vectors at their RAM locations j j 

768-778 ($300-$30A). '-' 

58459 $E45B INITVCTRS* 

Copy BASIC vectors from ROM to RAM. LJ 

This is called by COLDBA* 58232 ($E378) during the cold start 
of BASIC. Six BASIC vectors at location 58447 ($E44F) are copied to j ^ 
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RAM. See the description of these vectors at their RAM locations 

768-778 ($300-$30A). 

n 58471 $E467 WARMBAS'' 

Perform a warm start of BASIC. 

r—i When both the RUN/STOP and RESTORE keys are pressed, the 

' ' BREAK* routine at 65234 ($FED2) uses the vector at ($C002) to 

branch here after it has completed its duties. 

See the BREAK* routine for details of the RUN/STOP- 
RESTORE and ML BRK instruction functions performed. 

The BASIC current I/O channel at 19 ($13) is reset to 0, indicat- 
ing the keyboard. Calls are made to the following routines: 
CLRCHN 62451 ($F3F3) to reset all I/O channels to their defaults 
(keyboard in, screen out); part of the CLR routine at 50810 ($C67A) 
is called to reset the temporary string stack at 22 ($16); and the 6502 
stack pointer (.S) is also reset. 

Finally, this jumps to the routine READY 50292 ($C474) to dis- 
play the READY, message. 

For more details of the function performed, see the listed 
routines. 

Notice that the BASIC program and variables have been pre- 
served and that only the stack entries have been lost. 



58486 $E476 

Program patch area. 

This contains two instructions that are used by the routine 
BLOAD 57701 ($E165) to add calls which rechain the program lines 
by calling routine LNKPRG 50483 ($C533), to call the routine 
RESTOR at 51229 ($C81D), and to reset the temporary string stack 
pointer and the 6502 stack pointer. 

The remainder of this area is composed of bytes containing the 
value 255 ($FF). 
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Kernal ROM 



^ Location Range: S8528-65S35 ($E4A0-$FFFF) 

Kernal ROM 

The Kernal handles all the I/O devices, including the screen and 
keyboard, and provides routines that both BASIC and machine lan- 
guage routines can use to communicate with devices. 

The Kernal is started when power-on/reset occurs. The 6502 
chip automatically jumps to the location specified in location 65532 
($FFFC), which is the Kernal start-up routine. See that location for a 
description of the start-up activities. 

Any Kernal routine can be entered or jumped out of at virtually 
any point. The descriptions in this chapter are individualized by the 
entry and exit points most often used. A routine to perform a given 
function can, in fact, be entered at a point that causes a different 
function to be processed. 

The Kernal likes to use an existing routine if possible, rather 
than forcing the computer to contain the same instructions at two 
locations. Many levels of JSRs, stack manipulation of the return 
address, and other techniques may be confusing when you're first 
examining a routine. It's typical to use one routine to set up param- 
eters for an existing routine to process. The descriptions below 
attempt to identify the fact that another routine is called to perform 
the task attributed to a particular routine, and to indicate places 
where the Kernal falls through (doesn't exit at the end of a routine, 
but continues into the next sequential routine). 

58528 $E4il8 SERSUTl* 

Serial: output a 1 on the serial data line. 

This routine sets VIA2PCR* ($912C, bit 5) to to indicate the 
r-i manual output mode; CB2 to be held low. This sends a 1 on the 

■ serial line. 

This is called by all routines that send serial data. 

n 58537 $E4A9 SERSUTa'' 

Serial: output a on the serial data line. 

^ This routine sets VIA2PCR* ($912C, bit 5) to 1 to signal the 

I i manual output mode; CB2 to be held high. A is thus sent on the 

serial line. 

It's called by all routines that send serial data. 

f^ ■' 

i 1 
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$E4B2 SERGET* 

Serial: get an input bit from VIAl and stabilize. 

This retrieves a serial bit from VIA1PA2* at 37151 ($911F) and 
stabilizes it by testing until it remains constant. The bit is then 
placed in .A. 

58556 $E4BG PilTGHES* 

Program patch area. 

Preamble to LOADRAM 62786 ($F542) to display a SEARCH- 
ING message. 

58561 $E4G1 entry point: 

Transfer 195-196 ($C3-C4) to 174-175 ($AE-AF) and display 
LOADING or VERIFYING message. 

58575 $E4GF entry point: 

Addendum to close tape (write header I.D. 5). 

58624 $E50G IGBA8E 

Retrieve the address of the I/O memory page. 

In the VIC-20, a call to this routine returns the address of the 
first 6522 VIA chip in .X and .Y. The address of that chip is 37136- 
37151 ($9110-$911F). 

This routine is provided to give programs which use the VIA 
type device to perform I/O operations the ability to locate the 
address of that device for future compatibility on other similar 
devices. There are PIAs and CIAs that are of the same type as the 
VIA. 

The routine RND 57492 ($E094) calls this routine to access the 
VIA timers for the expression RND(O). 

To utilize the vectored compatibility feature, always call this 
routine through the jumping vector at 65523 ($FFF3). 
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! [ 

Retrieve the maximum number of screen columns and lines. ' — 

For compatibility purposes, this routine returns the size of the 

screen in columns and lines, and sets .X to indicate 22 columns and j j 

.Y to signify 23 lines. '— ' 

Be aware that these are constant values and are not obtained by 

examining the 6560 VIC chip registers. i , 

To utilize the vectored compatibility feature, always call this I — ' 
routine through the jumping vector at 65517 ($FFED). 

You may use this routine to determine if your program is run- 
ning on a VIC-20: (_j 
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SYS 65517:IF PEEK(781)<>22 OR 

PEEK(782)<>23 GOTO xxx 

The routine will branch to xxx if not a VIC-20. 

58634 SESOA PLOT 

Read or set the current cursor column and line. 

The numbers used and returned correspond to the physical lines 
and columns, not the logical linked lines. 

If the carry flag is clear, .X is saved in location 214 ($D6), the 
cursor line number; .Y is saved in 211 ($D3), the cursor row number; 
and the cursor is moved to that position on the screen. 

If the carry flag is set, .X is loaded from location 214 ($D6) and 
.Y is loaded from 211 ($D3). These values are then returned to the 
caller. 

See location 217-241 ($D9-F1) for an example of using this rou- 
tine from BASIC. 

The BASIC keywords POS, TAB, SPC, and a comma included in 
PRINT parameters cause this routine to return the current cursor 
position. 

To utilize the vectored compatibility feature, always call this 
routine through the jumping vector at 65520 ($FFFO). 

58648 $E518 IIIIT8K* 

Initialize the 6550 VIC chip, screen, and related pointers. 

This is called by the power-on/reset and RUN/STOP- 
RESTORE keys routines. It restores the keyboard and screen as I/O 
defaults by calling SETIODEF* at location 58811 ($E5BB). 

It also resets the 6560 VIC chip registers 36866 ($9002) and 
36869 ($9005) from the screen page number stored in 648 ($288). 
These are the screen address registers. 

The cursor blink counts, keyboard table scan address, keyboard 
buffer size, and current foreground color nybble in low memory 
work areas are also reset. This routine then falls through to the 
following routines. 



Clear the screen. 

n See location 217-241 ($D9-F1) for an example of using this 

routine. 

This routine falls through. 

n 58753 $E581 HOME* 

Move the cursor to the screen home position. 

rn This falls through to the following routine. 
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587S9 $ES87 SETSLINK* 

Reset the screen line link table pointers. 

See location 217-241 ($D9-F1) for an example of using this rou- I I 

tine and an explanation of the screen line link table. 

5880S SESBS UNUSDNMf |j 

NMI entry for restore key (no entries to this routine found). 

A short routine, this calls SETIODEF* 58811 ($E5BB) and then 
JuMPs to the HOME* routine at 58753 ($E581). There appears to be 
no reference to this routine. 

S88II SESBB SETIODEF* 

Reset the default device numbers. 

This routine is called by INITSK* 58648 ($E518). 

Locations 153-154 ($99-9A) are reset to indicate that the input 
device number is now the keyboard (device 0) and the output device 
is the screen (device 3). This then falls through to the next routine. 

S88I9 $ESC3 INITVIG* 

Reset the VIC chip registers. 

This routine sets the VIC chip registers from a table at VICINIT* 
60900 ($EDE4) to 36864-36879 ($9000-900F) during power-on/reset 
or RUN/STOP-RESTORE processing. 

S883I SESCF LP2 

Get a character from the keyboard queue and shift it down. 

.A is loaded with the first character in the keyboard buffer at 
location 631 ($277). The count of characters in the buffer (at location 
198, $C6) is decremented, and the characters remaining in the buffer 
are shifted down to the beginning. 

This is called by routines GETQUE* 58853 ($E5E5) and GETIN 
61941 ($F1F5). 

S8853 SESES GETQUE* M 

Wait for character to appear in the keyboard buffer. 

This routine is called by GET2RTN* at 58905 ($E619) as it is 
obtaining characters up to a carriage return. j) 

The routine calls for the display of the current character, turns 
off cursor flashes if there are characters in the keyboard buffer at 631 
($277), calls LP2 58831 ($E5CF) to obtain a character, and loops in [ j 

the calling instructions until it's returned a character. If SHIFT/RUN ^ 

has been pressed, it places LOAD and RUN in the keyboard buffer 
from location 60916 ($EDF4), and returns to GET2RTN* with a 
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character for it to process. It will return if it's not a carriage return — 

forcing any previous keyboard buffer characters to be displayed. 
PI The loop in this routine is the reason why INPUT* or calling 

' ' the routine CHRIN 61966 ($F20E) is not recommended for device 2, 

RS-232. This loop will cause the other necessary protocol checking 
r— » instructions not to be performed until a carriage return is received. 

' i This can be disastrous for the handshaking RS-232 routines, since 

they could get out of sjmchronization with the sending device. 



n 
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Empty and display the keyboard buffer up to a carriage return. 

This is caUed by routine GETSCRN* 58959 ($E64F) to display 
the keyboard buffer at 631 ($277) up to a carriage return. 

In him, it calls routine GETQUE* 58853 ($E5E5) to loop waiting 
for another keyboard buffer character. It recalls that routine until it 
returns with a carriage return. 

This routine sets various low memory pointers to the beginning 
and end of the character string obtained and displayed. 

S8959 $E64F GETSCRN* 

Obtain INPUT from screen. 

Because this routine calls GET2RTN* 58905 ($E619), any key- 
board buffer contents will have been displayed on the screen. This 
routine differentiates between keyboard and screen input, but reads 
the screen for both. It's called by the routine CHRIN 61966 ($F20E). 

59064 $E6B8 QUOTECK'' 

Test for quotes and set flag. 

This sets the quote mode flag at location 212 ($D4) if the ASCII 
value for a quote character (34) is in .A. 

This quote mark check is performed when reading from the key- 
board or screen, and when writing to the screen. 

S9077 SEGCS SETCHAR* 

Set up display of a character on the screen. 

The routine PUTSCRN* at location 60074 ($EAAA) actually 
stores a character on the screen, but this and other routines are 
needed to check and set the environment before that action takes 
place. 

The state of insert and reverse mode is tested for and accom- 
modated, the current color nybble is retrieved from location 646 
($286), the routine at SYNPRT* 60065 ($EAA1) is called to cause the 
color for the screen location to be saved in the color map and the 
character to be displayed, and the routine calls the next routine to 
advance the cursor. It then exits. 

251 



INST 


CLR 


RETURN 


DEL 


HOME 


SHIFT 


cursor keys 


RVSON 


Commodore key 


color keys 


RVSOFF 
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See the routine SCRNOUT* at location 59202 ($E742); it calls 
this routine. 

59114 $E6EA SCROLL U 

Advance the cursor on the screen, adds lines, and scroll. 

After the cursor is advanced one position, the need for screen | J 

scrolling and insertion of blank lines is determined and satisfied. ' — ' 

See the routine SCRNOUT*, which calls this routine. 

59181 $E72D RETREinr* 

Back up cursor into the previous logical screen line from the first 
column of the current logical line. 

Refer to the routine SCRNOUT* at 59202 ($E742). SCRNOUT* 
calls this routine. Contrast this routine with BACKUP* at 59624 
($E8E8). 

59202 $E742 SCRNOUT* 

Handle characters going to the screen. 

This routine is the main driver routine (in other words, calls 
other routines to accomplish the needed functions) for displaying 
characters on the screen and handling control characters. In essence, 
this is the heart of the screen editor. 

The other screen-related routines are called as needed by this 
routine to perform their tasks. 

The actions of this routine vary, depending on whether direct or 
program mode is active. 

The following keys are given their meaning and screen function 
by this routine: 



59587 $E8C3 NXTLINE* \J 

Advance cursor to the next logical screen line. 

59698 $E8D8 RTRN* 

Handle the carriage return key. 

This routine turns off quote mode, zeros the number of 
outstanding inserts, turns off the reverse mode, and positions the j J 

cursor to the start of the next logical line. 
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Move the cursor to the end of the previous physical screen line 
I I from the first column of a continuation of a logical line. 

Contrast this routine with the routine RETREAT* at location 
59181 ($E72D). 

59642 $E8FA FORWIIRD* 

Move the cursor to the start of the next screen line if the cursor is 
in the last column of the screen. 

59666 $E912 GDL9RSET* 

Set the current foreground color code. 

The color code table at COLORTBL* 59681 ($E921) is scanned 
for the character in .A. If found, the number of the table entry 
becomes the color code at location 646 ($286). 

59681 $E921 C9L9RTBL* 

Color code key table. 

The ASCII values of the keys corresponding to each color code 
are: 

Table 9—1. ASIffl Values for Color Codes 

Dec Hex Color Code 

144 $90 

5 $05 

28 $1C 

159 $9F 

156 $9C 

30 $1E 

31 $1F 
158 $9E 



BLK 





WHT 


1 


RED 


2 


CYN 


3 


PUR 


4 


GRN 


5 


BLU 


6 


YEL 


7 



$E929 CNYRTGD* 

Code conversion table. 

This 76-byte table has so far defied all my attempts to determine 
its use. My guess is that it's a keyboard decoding table, but I haven't 
found any references to it in the Kemal or BASIC. 

59765 $E975 SCRL 

Scroll the screen. 

A lot of work needs to be done to scroll the screen. An entire 



,__ logical line needs to be scrolled off the top and a complete logical 

i I line scrolled in from the bottom while in direct mode. 
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The screen line link table at 217 ($D9) must be adjusted, the 
screen map and color map lines must be moved, lines may need to 
be erased, and low memory pointers need to be updated to reflect j | 

the current cursor position. The STOP key is tested during this 
routine. 

59886 $E9EE OPENUlf U 

open up a blank physical line on the screen for inserts. 

Inserting a blank line on the screen is another complex task for 
the screen editor. Scrolling downward may need to be done, in addi- 
tion to all the tasks described for routine SCRL 59765 ($E975). 

S999& $EAS6 M9VLmE* 

Move screen line. 

Twenty-two bytes are moved from one screen line to another, 
including the corresponding color map bytes. 

69914 $EA6E 8ETADDR* 

The address of the screen line and color line is set in memory. 

A call to the routine COLORSYN* at 60082 ($EAB2) returns the 
color map address for the screen line. The screen line link table 
address is stripped of continuation flags. Both of these addresses are 
stored in work areas for other screen routines. 



$EA7E LINPTr 

Set a pointer to the address of the start of a screen line. 

This determines the screen line address from both the screen 
line link table and from the screen line LSB table at location 60925 
($EDFD), given the number of the screen line to obtain the address 
for. The pointer being set is located at 209-210 ($D1-D2). 

6994S SEASD GLRAUNE* 

Blank out a physical screen line. 

This moves spaces to 22 bytes of the screen map, pointed to by j { 

a temporary pointer, and sets the corresponding color map bytes to 
the color code representing white. 

69968 SEAAl SYNPRT* U 

Synchronize color to byte and store character on screen. 

The cursor blink countdown at location 205 ($CD) is set to 02, | I 

and the routine COLORSYN* (60082 $EAB2) is called. This routine '— ' 

then falls through. 

U 
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60074 SEAAA PUTSCRlf 

__ Store a character on the screen. 

I ' PUTSCRN* isn't an involved routine, since the routines called 

by SETCHAR* have done all the hard work. 
_ On entry, .A=screen POKE code; .X= foreground color. These 

! I are placed in the appropriate screen map and color map positions 

pointed to by temporary pointers. 

60082 $EAB2 COLORSYIT' 

The address of the color map byte for screen map byte is found. 

The screen map byte pointer in location 209-210 ($D1-D2) is 
converted to a color map byte pointer in 243-244 ($F3-F4). 

See location 217-241 ($D9-F1) for an example of using this 
routine. 

6008S SEABF IRQ 

IRQ interrupt handler. 

When the 6502 encounters an IRQ interrupt, it jumps off the 
vector at 65534 ($FFFE) which points to the routine IRQROUT* at 
location 65394 ($FF72). That routine will jump off the RAM vector at 
location 788-789 ($314-315) to reach this routine if the interrupt 
was not caused by a RUN/STOP-RESTORE key. 

Normally, this routine is entered every 1/60 second because of 
the interrupts generated by timer 1 of VIA2. The routine calls 
UDTIM 63284 ($F734) to update the jiffy clock at location 160-162 
($A0-A2) and to obtain the current keypress from 37167 ($912F) 
and store it in location 145 ($91). The cursor is blinked and the tape 
motor is turned off if appropriate. The routine SCNKEY 60190 
($EB1E) is called to do the keyboard scan. Refer to that location for 
more details. 

Tape I/O interferes with accurate clocking and the RUN/STOP 
key, since the vector at 788-789 ($314-315) is replaced during the 
tape operation. 

See the notes at location 788-789 ($314-315). 



Scan the keyboard for keypresses using 6522 VIA2. 

The A and B ports of VIA2 (VIA2PB* ($9120) and VIA2PA1* 
($9121)) are examined for kej^resses using the techniques outlined 
at those locations. Normally the table ASCII values of keys located 
at NORMKEY* 60510 ($EC5E) are used to decode the key. Location 
245-246 ($F5-F6) points to this table or any alternate table used. 
Location 653 ($28D) is set to indicate any SHIFT, Commodore, or 
CTRL key pressed. Location 203 ($CB) is set to the matrix coordinate 
of the current key pressed; a value of 64 is set if no keys are pressed. 
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The vector at 655 ($28F) is used to call SETKEYS* 60380 
($EBDC). Then the routine checks the repeater flag at 650 ($28A) 
and repeats the key if the time intervals set in 651 and 652 ($28C) 
allow. 

If the count of characters in the keyboard buffer (location 198, 
$C6) is less than ten, the ASCII value of the key is placed in the 
keyboard buffer at location 631 ($277) and the count is incremented. 

At exit, VIA2 is left in a mode to sense the RUN/STOP key 
quickly. 



SETKEYS 

Set keyboard decode table address in 245-246 ($F5-F6) 

This routine is called by SCNKEY at 60190 ($EB1E) to deter- 
mine the correct keyboard decoding table to be used, based upon the 
SHIFT key flags at location 653 ($28D). Location 657 ($291), the flag 
to enable/disable the SHIFT/Commodore key switch, is checked 
when selecting the proper table. The VIC chip register at 36869 
($9005) is set to reflect any change in character sets. This routine has 
many NOP instructions which indicate that it evidenfly had addi- 
tional functions or tests at one time. The Commodore 64 version has 
been cleaned up. 

The pointers in KEYVCTRS* 60486 ($EC46) are used as the cur- 
rerjt table address to be stored in location 245-246 ($F5-F6). See the 
following routine for the possible table values. 

60486 $EC46 KEYVCTRS* 

Keyboard decode table addresses. 

The routine SETKEYS* 60380 ($EBDC) uses this table to store 
the current keyboard decode table address in locations 245-246 
($F5-F6), based upon the shift flags in 653 ($28D). 

ftble 9—2. Keyboard Decoding Table 



Shift flags in 
Location 653 ($28D) 
Dec Binary 

00000000 

1 00000001 

2 00000010 

3 00000011 



4 
5 
6 
7 
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00000100 
00000101 
00000110 
00000111 



Keys being pressed 

none 
SFHFT 

Commodore key 
SHIFT + Commodore 



CTRL 

SHIFT + CTRL 

Commodore -I- CTRL 

SHIFT + CTRL -I- 

Commodore 



Decode table 
address set in 245-246 



60510 


$EC5E 


60575 


$EC9F 


60640 


$ECEO 


60510 


$EC5E 


or 60575 


$EC9F 


(until pressed again) 


60835 


$EDA3 


60835 


$EDA3 


60835 


$EDA3 



60835 



$EDA3 



u 
u 
u 
u 
u 



u 
u 
u 
u 

Q 



n 
n 



60777 



n 



SEGSE NORMKEYS* 

Table used for decoding unshifted keys into ASCII. 

n Also used for CTRL plus SHIFT key decoding of keys. 

Refer to Table 1-1, Keycode Values at Location 197 ($C5), for 
the ASCII value for each key. 

n eOS75 $EC9F SHFTKEYS'' 

Table used for decoding SHIFTed keys into ASCII. 

Also used for CTRL plus Commodore key decoding of keys. 

60640 SECEO L060KEY8* 

Table used for decoding Commodore SHIFTed keys into ASCII. 

60705 $ED21 CHAR8ET* 

Used to set uppercase/graphics character set. 

The VIC chip control register at location 36869 ($9005) is set to 
reference the uppercase/graphics character set. 



Set the environment specified by graphics control characters. 

This is called by the routine SCRNOUT* 59202 ($E742) to 
implement the graphic modes specified by certain ASCII control 
characters. 

Table 9—8. GiaphiGS Controls 

CHR$ Effect 

14 Select lowercase mode 

142 Select uppercase mode 

8 Disable shift to another case 

9 Enable shift to another case 

60763 SEDSB WRAPUNE* 

_ This routine is called by SCROLL 59114 ($E6EA) to mark the 

I 1 next physical screen line in the screen line link table as no continu- 

ation of the current line. 

n 60777 $ED69 WHilTKEys' 

Apparently unused keyboard decoding table. 

From the values that are stored here, the table was perhaps to 
|~| be used as a CTRL and Commodore key decoding table, but it's now 

unable to be referenced. The Commodore 64 does not have this 
table. 
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SEDAS CTRLKEYS* 



60900 $EDE4 VIGINIT* 

Initial values for VIC chip registers. 

The routine INITVIC* 58819 ($E5C3) loads these values into the 
VIC chip registers at 36864-36879 ($9000-900F) when power-on/ 
reset or RUN/STOP-RESTORE is being processed. 
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Table used for decoding CTRL SHIFTed keys into ASCII. 

This is also used when any other SHIFT key (SHIFT and/or | | 

Commodore key) is pressed while the CTRL key is pressed. 



u 



$EDF4 RUNTB 

LOAD and RUN words for SHIFT and RUN keys. 

The characters LOAD and RUN (each followed by a carriage 
return) are placed into the keyboard buffer at location 631 ($277) by 
the routine GETQUE* when the left SHIFT key and RUN key are 
pressed at the same time. 

60925 SEDFD LDTB2 

Screen line link table LSB of lines in screen map. 

This table is used by the routine LINPTR* 60030 ($EA7E) to 
obtain the address of any given screen line and place it in location 
209-210 ($D1-D2). The table contains 23 entries; the first contains 0, 
and each succeeding entry is incremented by 22. 

See location 217-241 ($D9-F1) for an example of using this 
table in conjunction with the RAM located screen line link table. 

60948 SEEM TALK 

Serial: send talk with attention. 

Bit 6 of the device number is turned on to instruct the serial 
device to talk to the VIC-20. The routine then falls through to the 
next routine, skipping the first instruction. . 

The use of this routine is discussed in the VIC-20 Programmer's 
Reference Guide. V ] 

60951 $EE17 LISTEN 

Serial: send listen with attention. 

Bit 5 of the device number is turned on to instruct the serial 
device to listen to the VIC-20. The routine then calls RSPAUSE* 
61792 ($F160) to disable any RS-232 NMIs and falls through to the 
next routine. 

The use of this routine is also discussed in the VIC-20 Pro- 
grammer's Reference Guide. 
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60956 SEEK LI8TI 

Serial: prepare to send serial command with attention. 

The character to be sent is saved in location 149 ($95), and a 
handshaking protocol sequence is sent to the device so that it will 
listen to the command about to be sent. This routine then falls 
through. 

An alternate entry point to this routine is at 60992 ($EE40). 
Entry at this point causes a send without the attention bit. 

61001 $EE49 8R8END* 

Serial: send command or data to serial devices. 

This sends the data or command to the addressed serial device, 
checking to see that it acknowledges receipt of the transmission. 
Location 165 ($A5) is used to count down the bits to be sent, which 
are in location 149 ($95). 

61108 $EEB4 SRBAD'' 

Serial: set ST for timeout or DEVICE NOT PRESENT. 

Depending on which instruction the routine is entered, it sets 
the appropriate ST bits at location 144 ($90) by calling READIOST* 
65130 ($FE6A). 

6U20 SEECO SECOND 

Serial: send secondary address after listen command. 

Once the serial device has been commanded to listen with the 
LISTEN routine 60951 ($EE17), the secondary address is sent to it 
after ORing with 96 ($60). The routine LISTl 60956 ($EE1C) is 
called to send the secondary address, then this routine falls through. 

The use of this routine is discussed in the VIC-20 Programmer's 
Reference Guide. 

6U25 SEECS SCilTN 

Serial: clear attention. 

This routine removes the serial attention bit from VIAl port A, 
bit 7. This is found in the VIA1PA2* routine at 37151 ($91 IF). 

61134 SEECE TKSA 

Serial: send secondary address after talk command. 

Once the serial device has been told to talk (the routine TALK 
does this), the secondary address is sent to it. The acknowledgment 
from the device is awaited. Routines LISTl 60956 ($£E1C), 
SEROUTO* 58537 ($E4A9), SCATN 61125 ($EEC5), SRCLKHI* 
61316 ($EF84), and SERGET* 58546 ($E4B2) are called to perform 
the task. 
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61209 $EF19 

Serial: receive byte from serial device. 

The routines TALK 60993 ($EE41) and TKSA 61134 ($EECE) are 
called prior to this routine to initiate and send the dialog. 

This routine is discussed in the VIC-20 Programmer's Reference 
Guide. 
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You can refer to the VIC-20 Programmer's Reference Guide for 
details on how to use this routine. 

61156 $EEE4 CIOUT U 

Serial: send a byte on the serial line. 

This routine is called after the serial device has been instructed 
to listen (by the routine LISTEN) and after any needed secondary 
address has been sent with SECOND 61120 ($EECO). 

The character to be sent into location 149 ($95) is set by this 
routine, which sends it via a call to SRSEND* 61001 ($EE49) when 
this routine is next called, or when UNLSN 61188 ($EF04) is called. 

Look at the WC-20 Programmer's Reference Guide for details on 
how to use this routine. 

61174 $EEF6 UNTLK 

Serial: send untalk command to serial devices. 

All talking devices are instructed to stop talking when this is 
issued. The routine actually falls through to the next routine to per- 
form much of the task. 

The use of this routine is discussed in the y/C-20 Programmer's 
Reference Guide. 

61188 $EF04 UNL8N 

Serial: send unlisten command to serial devices. 

All listening devices are told to stop listening. 
Refer to the VIC-20 Programmer's Reference Guide for a dis- 
cussion on how to use this routine. 



u 



61316 $EF84 ORCLKHI* 

Serial: set clock line high. 

This hims off bit 1 of V1A2PCR* 37164 ($912C), causing CA2 to U 

be set to a low value. It's inverted to high by the circuitry. 

This routine is called by several other routines to assist in the 
serial handshaking sequences. | | 
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$EFSD SRCLKLO'' 



Serial: set clock line low. 

n Bit 1 of VIA2PCR* 37164 ($912C) is turned on by this routine, 

causing CA2 to be set to a high value, which is inverted to low by 
the circuitry. 

ri This is called by other routines to assist in the serial 

handshaking sequences. 

61334 $EF96 WAITABIT* 

Serial: delay one millisecond. 

Called by the routine LISTl 60956 ($EE1C), this routine uses 
the second timer in VIA2 to time a one-millisecond delay, looping in 
instructions that test for its expiration. 

61347 $Eni3 RSNXTBIT* 

RS-232: send the next bit (NMI continuation routine). 

This checks location 180 ($B4) to determine if all the bits for the 
byte in 182 ($B6) have been sent. It calls RSPRTY* 61375 ($EFBF) to 
calculate the parity when the entire byte has been sent. Location 181 
($B5) is set to 1 or for the next bit to be sent. Location 189 ($BD) is 
used as a parity work byte. When an RS-232 interrupt occurs, VIAl 
CB2 will be set high or low, depending on the value in location 181 
($B5). 

61375 SEFBF RSPRTY* 

RS-232: calculate parity and stop bits value. 

This is called by the above routine RSNXTBIT* to calculate the 
parity and number of stop bits for a byte. Location 189 ($BD) is used 
to determine which state the parity bit should have (1 or 0), depend- 
ing on the parity option chosen. Even or odd parity specifications 
send the corresponding parity bit. For instance, even will send a one 
parity only if the number of bits in the byte is odd, therefore making 
it even. Mark parity always transmits parity bit of 1. Space parity 
always transmits a parity bit. 

61416 SEFES RSST6PS* 

RS-232: transmit stop bits. 

Depending on the number of stop bits requested by the user, 
this roi^tine is called once or twice to generate and send either one 
or two stop bits. This is accomplished by calling an alternate entry 
point of RSNXTBIT* 61347 ($EFA3). Location 180 ($B4) is used to 
calculate the needed stop bit configuration. 
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61422 SEFEE RSNXTBYT* 

RS-232: prepare the next byte to be sent from send buffer. 

Called by routines RSNXTBIT* 61347 ($EFA3) and RSNMISET* jj 

61710 ($F10E), this routine obtains the next byte to be sent from the 

transmit buffer at the top of RAM created when the RS-232 device 

was opened. i i 

Because of an incorrect address in the code, this routine always '— ' 

believes that Clear To Send and Data Set Ready are present. 

The number of bits to send is placed in 180 ($B4), while loca- 
tions 181 ($35) and 189 ($BD) are zeroed. The byte to be sent is 
placed in 182 ($B6). The transmit buffer pointer at 669 ($29D) is 
kept current. 

61462 $FDI6 RSMIS8NG* 

RS-232: set Clear To Send or Data Set Ready Missing status. 

Meant to set the RS-232 status byte at 663 ($297) when either of 
these two conditions is met, it seems that only Data Set Ready Miss- 
ing will be set because of the coding errors at OPENRS 62738 
($F512) and RSNXTBYT* 61428 ($EFF4). 

This is called when an error is detected when opening RS-232 
or preparing the next byte to be sent. 

61479 $F627 R8GPTBIT* 

RS-232: compute desired word length bit count 

When opening the RS-232 device, this routine is called to cal- 
culate the correct number of data bits, based on the number specified 
in the control register at location 659 ($293). 

61494 $FG36 R8INBIT* 

RS-232: receive an input bit (NMI driven). 

Called by the routine RSNMI* 65246 ($FEDE) when a timer 2 
interrupt is sensed, this routine calls RSSTRBIT* to determine if a 
start bit was received. If so, then bit of 167 ($A7) will contain the 
inbound bit from the RS-232 device. Location 170 ($AA) is built bit ; -: 

by bit, and then RSINBYTE* 61551 ($F06F) is called to store the new U 

byte in the receive buffer. 

61S1S $F64B RSSTPRIT* [j 

RS-232: determine if all the stop bits have been received yet. 

If the proper number of stop bits has not yet been received, the ■ — 

routine exits. Otherwise, it falls through to the next routine. Loca- l_J 
tions 167-168 ($A7-A8) are used to determine the number of stop 

bits received. . . 

u 
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^ 61S31 SFOSB RSPREPllf 

RS-232: prepare to receive the next input byte. 

n The routine enables VIA 1 CBl interrupts, disables timer 2 inter- 

rupts, and sets 169 ($A9) to indicate that a start bit is being sought. 

n 61544 $F068 RSSTRBIT* 

RS-232: check for start bit in receive mode. 

Location 169 ($A9) is tested to see if a start bit has been 
received. If not, this goes to the routine RSPREPIN* 61531 ($F05B). 

61S5I $F06F RSINBYTE* 

RS-232: put constructed byte into receive buffer. 

If the receive buffer pointed to by location 668 ($29C) has room 
for a character, this stores the byte in the buffer and falls through to 
the next routine. Otherwise, it forgets the just-received character and 
goes to RSOVERUN at location 61602 ($F0A2). 

61579 $F68B R8INPRTY* 

RS-232: parity checking of the input byte. 

The parity option selected, if any, that was stored in 167 ($A7) 
is compared to the input byte parity stored in location 171 ($AB). If 
correct, the routine RSSTPBIT* 61515 ($F04B) is branched to. Other- 
wise, a branch is made to the RSPRTYER* routine at 61597 {$F09D). 

61597 $F99B RSPRTYER'' 

RS-232: parity error on input byte. 

This loads .A with the error code ($01) and goes to routine 
RSINERR* at location 61610 ($FOAA). 

61662 $F6A2 RSgVERUN* 

RS-232: buffer overrun on input byte. 

This routine loads .A with the error code ($04) and goes to rou- 
tine RSINERR* 61610 ($F0AA). 
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61665 $F6A5 RSBREAK 

RS-232: break detected on input. 

i I .A is loaded with the error code ($80) and this routine goes to 

RSINERR* at 61610 ($F0AA). 

n 61668 $F6A8 RSFRAMER'' 

RS-232: framing error on input. 

This loads .A with the error code ($02) and goes to routine 
n RSINERR* 61610 ($F0AA). 
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SFOAA RSINERR'' ^ 

RS-232: set input error status and continue. 

After the RS-232 error status is posted in 663 ($297) for the user j_J 
to correct, the next input byte is prepared for by jumping to 

RSPREPIN* 61531 ($F05B). _ 



61625 SFOBO RSDVCERR"^ 

RS-232: ILLEGAL DEVICE message for LOAD or SAVE. 

An ILLEGAL DEVICE NUMBER message is issued if a LOAD or 
SAVE is attempted on an RS-232 device. The routine FILEMSG* at 
location 63358 ($F77E) is called to issue the message. 

61628 $FOBC R86Pil6UT* 

RS-232: open an RS-232 channel for output. 

This routine is called by CHKOUT 62217 ($F309) to prepare an 
RS-232 output channel. The routine performs tihe necessary x-line 
handshake and simply returns for three-line handshaking. 

61677 $F6ED RSOUTSiW* 

RS-232: store a character in the transmit buffer. 

If there is no room in the transmit buffer, the routine loops until 
the character can be stored in the buffer. Interrupts cause sending 
routines to remove bytes from the buffer and send them along. The 
transmit buffer at location 670 ($29E) is kept current. 

This routine falls through to the next routine if transmission has 
not been started; otherwise,it returns. 



61698 $n02 

RS-232: set up NMI for transmission. 

This prepares timer 1 of VIA 1 to interrupt at the needed time to 
implement the selected baud rate. Location 665-666 ($299-29A) 
contains the bit timing value for the baud rate. 

The routine RSNXTBYT* 61422 ($EFEE) is called to begin 
transmission. 
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61718 $F116 

RS-232: open an RS-232 channel for input. 

Called by routine CHKIN 62151 ($F2C7), this routine enables 
timer 2 and CBl interrupts on VIAl and exits for three-line mode or 
full duplex X-line handshaking. Half duplex x-line handshaking i~ 

causes a check for dataset-ready and clear-to-send to turn off, turns ' — ' 

off request-to-send, and v^raits for data-terminal-ready to come on 
before proceeding. 
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$F14F RSMXTIlf 

RS-232: retrieve the next character from the receive buffer. 

GETIN at 61941 ($F1F5) calls this routine for the next RS-232 
input byte. The receive buffer is emptied by this routine, returning a 
in .A if no characters are in the buffer. 

61792 $F160 RSPAUSE"^ 

RS-232: check that serial and tape are idle, to protect from RS-232. 

Tape and serial read/write routines call this routine to insure 
that RS-232 NMI sequences are not currently active, which would 
hinder tape and serial timing. If RS-232 is active, the routine loops 
until the RS-232 sequence is finished. 

61812 $F174 KMSGTBL* 

Table of Kernal messages. 

The last letter of each message has the high order bit on. To 
cause a particular message to be printed, .Y is loaded with the index 
of the message within this table, then the routine KMSGSHOW* at 
61926 ($F1E6) is branched to. If an I/O ERROR message is to be 
displayed, the FILEMSG routine at 63358 ($F77E) is branched to at 
the appropriate entry point to cause the desired error number to fol- 
low the message. 

Table 9-4. Rernal Enoi Messages 



Index 






Dec 


Hex 


Message 


00 


$00 


(CR) I/O ERROR 

This message is followed by a code number: 

1 TOO MANY FILES 

2 FILE OPEN 

3 FILE NOT OPEN 

4 FILE NOT FOUND 

5 DEVICE NOT PRESENT 

6 NOT INPUT HLE 

7 NOT OU IPUT FILE 

8 MISSING filename 

9 ILLEGAL DEVICE NUMBER 


12 


$oc 


(CR) SEARCHING FOR 


27 


$1B 


(CR) PRESS PLAY ON TAPE 


46 


$2E 


PRESS RECORD & PLAY ON TAPE 


73 


$49 


(CR) LOADING 


81 


$51 


(CR) SAVING 


89 


$59 


(CR) VERIFYING 


99 


$63 


(CR) FOUND 


106 


$6A 


(CR) OK 
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BASIC preempts the Kemal error message I/O ERROR in program 

mode. BASIC has its own error messages and prefers them over the 

Kemal message of I/O ERROR followed by an error number. See the I I 

list of BASIC messages at location 49566 ($C19E). '— ' 

See location 157 ($9D) for the Kernal control/error message 

selection indicator that enables or disables Kemal messages. The vec- ri 

tor at 65424 ($FF90) causes SETMSG at 65126 ($FE66) to reset loca- U 
tion 157 ($9D) to the value in .A. You could set this yourself with a 
POKE statement. 



61922 $nE2 

Display LOADING or VERIFYING if control messages wanted. 

This routine is called by 63082 ($F66A) to display the appro- 
priate message. It checks the flag at 157 ($9D) and skips the message 
if Kemal control messages are turned off. These would be turned off 
by BASIC in program mode; these messages are issued only in direct 
mode. 

This falls through to the next routine if the message is to be 
displayed. 

61926 $F1E6 101186^9111^ 

Print Kernal control messages. 

This is called by any routine wanting to display a Kemal control 
message. It leaves checking of location 157 ($9D), the Kemal mes- 
sage control, to the calling routine. .Y received is used as an index 
into the message table at address 61812 ($F174). 



61941 $F1F8 

Routing routine for obtaining a character of input data. 

The next input device character (or 0) will be placed in .A when 
this routine is called. Contrast this with the routine CHRIN 61966 
($F20E). 

This routine routes the actual processing of this function to sev- 
eral different routines, based on the device currently being used as 
indicated in location 153 ($99). 

The vector at 65508 ($FFE4) should be used to access this rou- 
tine so that the 810 ($32A) RAM vector will be used. 

If the input device is not the keyboard or RS-232, this goes to 
CHRIN. If the input device is for the keyboard and location 198 
($C6) indicates that the keyboard buffer is empty, then this simply 
returns. If there are characters in the buffer, the LP2 at 58831 
($E5CF) is called. 

For RS-232 devices, routine RSNXTIN* 61775 ($F14F) is called. 
BASIC READ, GET, and INPUT call this routine via the vector at 
810 ($32A). 
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The use of this routine is discussed in the VIC-20 Programmer's 
Reference Guide. 

61966 $F20E GBRIN 

Input characters from current input device. 

The resuh of calling this routine is that one byte of data is 
obtained from the input device and placed into .A. The keyboard or 
screen can return up to 88 bytes into the BASIC input buffer at 512 
($200), one byte being returned by each call to this routine. Contrast 
this with the routine GETIN 61941 ($F1F5). 

This routine routes the actual processing of this function to sev- 
eral different routines, based on the device that is currently being 
used as indicated in location 153 ($99). 

The vector at 65487 ($FFCF) should be used to access this rou- 
tine so that the 804 ($324) RAM vector will be used. 

For the keyboard or screen, the GETSCRN* routine at 59124 
($E64F) is used. 

For serial devices, the routine ACPTR 61209 ($EF19) is used; 
refer to the interesting feature before the call in routine CHRINSR* 
62052 ($F264). 

For the RS-232 device, CHRINRS* 62063 ($F26F) is called. 

Tape device handling falls through to the next routine. 

Refer to the VJC-20 Programmer's Reference Guide for a short dis- 
cussion on the use of this routine. 



62666 $F236 

Obtain a byte from the tape buffer. 

This calls CHRINTP2* 62032 ($F250) to point to the byte in the 
tape buffer or request the next tape block. It tests for end of data and 
sets location 144 ($90) to 64 ($40) if so. 

62632 $F256 GHRINTP2'^ 

Load .A with next tape character, getting block when needed. 

This routine calls JTP20 63626 ($F88A) to increment the pointer 
in 166 ($A6) to the next byte, calling JTP20 63680 ($F8C0) to get the 
next tape block if needed. 

62682 $F264 CHRIN8R* 

Obtain a byte from the serial line. 

If ST in location 144 ($90) is other than 0, this routine returns a 
carriage return as a data character in case you ignored EOI on serial. 
Otherwise, this jumps to the routine ACPTR 61209 ($EF19). 
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62063 $F26F 

Obtain a byte from the RS-232 device. 
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This loops in a call to RSNXTIN* 61775 ($F14F) until a nonzero 
is returned. 

Because of the possibility of an endless loop here, CHRIN is not r~ 

recommended for RS-232 devices. See page 255 of the VIC-20 Pro- U 

grammer's Reference Guide. GET# or the routine GETIN via the vec- 
tor at 65508 ($FFE4) should be used instead. 

62074 $F27A CHROUT 

Output character to current output device. 

Calling this routine sends one byte of data from .A to the output 
device. 

This routine routes the actual processing of this function to sev- 
eral different routines, based on the device that is currently being 
used as indicated in location 154 ($9A). 

The vector at 65490 ($FFD2) should be used to access this rou- 
tine so that the 806 ($326) RAM vector will be used. 

For screen output, the routine SCRNOUT* 59202 ($E742) is 
used; the routine CIOUT at 61156 ($EEE4) is used for serial output; 
and for RS-232 output, the routine RSOUTSAV* 61677 ($F0ED) is 
used. 

Tape output is handled by falling through to the next routine. 

62006 $F200 CHROUTTP* 

Output a character to tape. 

The character to be sent on an open channel is stored in location 
158 ($9E). 

This routine calls JTP20 63680 ($F8C0) to update the tape buffer 
index in location 166 ($A6) to the next byte. When the buffer is full, 
the routine WBLK 63715 ($F8E3) is called to write the block. 

Check the V7C-20 Programmer's Reference Guide for details on 
the use of this routine. 

62ISI $F2G7 CHKIN U 

Open .X file number channel for input. 

Once a file has been opened, this routine sets location 153 ($99), T] 

the input device, to the associated (.X) file device number. It also ' — ' 
checks that the file is opened, that it was opened as an input file, 

and that the device is present. ■ — 

For serial devices, both an instruction to talk and the secondary I 1 

address are sent to the device. 

For RS-232, this routine calls RSOPNIN* 61718 ($F116) to open 

the channel. j I 



268 



U 



n 
n 

n 



62431 



The jump at 65478 ($FFC6) should be used to access this rou- 
tine so that the 798 ($31E) RAM vector will be used. 



62217 $F309 CHKOUT 

Open .X file number channel for output. 

n Once a file has been opened, this routine sets 154 ($9 A), the 

' ' output device, to the associated (.X) file device number. It checks 

that the file is opened, that it was opened as an output file, and that 
the device is present. 

For serial devices, a command to listen, as well as the secondary 
address, is sent to the device. 

The routine RSOPNOUT* 62628 ($FOBC) is called to open the 
channel for RS-232. 

The jump at 65481 ($FFC9) should be used to access this rou- 
tine so that the 800 ($320) RAM vector will be used. 

62282 $F34A CL68E 

Close logical file number in .A. 

The FNDFLNO* routine at 62415 ($F3CF) is called by this rou- 
tine to find the file information; SETFLCH* 62431 ($F3DF) is called 
to get the index into the file tables. 

If RS-232, the buffers are deallocated and the routine MEMTOP 
65139 ($FE73) is called to return the two 256-byte areas to 
availability. 

If writing to tape, an end of file is put into the end-of-tape 
buffer 828 ($33C) and the buffer is written. If the secondary address 
has bit 1 on, an end-of-tape header with tape I.D. 5 is also written. 

Locations 152 ($98), the number of open files; 601 C$259), file 
number table; 611 ($263), the device number table; and 621 ($26D), 
secondary address table, are updated. 

The jump at 65475 ($FFC3) should be used to access this rou- 
tine so that the 796 ($31C) RAM vector will be used. 

62415 $F3CF FNDFLNO* 

Find file number (.X) in file table at 601 ($259). 

If the file number is found, .P bit 1 is set so that BEQ is true. 
This routine is called by the routines CHKIN, CHKOUT, CLOSE, 
and OPEN. 

62431 $F3DF 8ETFLClf 

Set file characteristics of file (.X) into 184-186 ($B8-$BA). 

File, secondary address, and device number are stored in the 
indexes at 184-186 ($B8-BA) from the entries in the tables: 
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601 ($259) LAT File number table 
611 ($263) FAT Device number table 
621 ($26D) SAT Secondary address table 

62447 $F3EF CLALL 

Abort all open files (with no close). 

This sets location 152 ($98) to indicate no open files and falls 
through to the next routine. 

The jump at 65511 ($FFE7) should be used to access this routine 
so that the 812 ($32C) RAM vector is used. 
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$F3F3 CLRCHN 

Abort all open channels. 

Locations 153 ($99), the input device, and 154 ($9A), the output 
device, are reset to keyboard (0) and screen (3). 

If serial devices were on open channels, this routine calls 
UNLSN 61188 ($EF04) and/or UNTLK 61174 ($EEF6). 

Pressing the STOP key calls this routine. 

The jump at 65484 ($FFCC) should be used to access this rou- 
tine so that the 802 ($322) RAM vector is used. 

62474 $F46A 6PEN 

Open a logical file, file number in 184 ($B8). 

If file number is used, this gets a FILE NOT AN INPUT FILE 
error. It also calls FNDFLNO* 62415 ($F3CF) to insure that the file is 
not already open and checks that this open doesn't exceed ten open 
files. 

File number, secondary address, and device number are stored 
in the tables: 

601 ($259) LAT FUe number table 
611 ($263) FAT Device number table 
621 ($26D) SAT Secondary address table 

If a serial device is being opened, the routine SERNAME* at 
62613 ($F495) is called; if an RS-232 device is being opened, 
OPENRS* 62663 ($F4C7) is called. [j 

When opening a file to be read from tape, this calls FNDHDR* 
at 63591 ($F867) to find the specified file, or calls 63407 FAH 
($F7AF) for the next file on the tape. T ', 

When opening an output file to tape, the routine TAPEH 63463 ' — ' 

($F7E7) is called to write the new file header (I.D. 4). 

The jump at 65472 ($FFC0) should be used to access this rou- j — j 

tine so that the 794 ($31A) RAM vector will be used. LJ 
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$F495 SERNAME^ 

Send secondary address and filename to serial device. 

The secondary address stored in location 185 ($B9) is sent to the 
serial device stored in 186 ($BA) by calling LISTEN 60951 ($EE17) 
and SECOND 61120 ($EECO). 

DEVICE NOT PRESENT is indicated if the return status 144 
($90) has the high order bit on. 

The filename pointed to by 187 ($BB) is sent by calling CIOUT 
61156 ($EEE4) for each character. 



$F4G7 OPENRS" 

RS-232: open RS-232 device. 

Up to four characters of the specified filename are stored in: 

659 ($293) RS-232 control register 

660 ($294) RS-232 command register 
661-662 ($295-296) RS-232 nonstandard bit timing 

The routine RSCPTBIT* 61479 (F027) is called to compute the 
desired word length bit count, which is stored in location 664 ($298). 

The clock time per bit is computed and stored in 665 ($299) 
using the table at 65372 ($FF5C). The resulting values are copied to 
37140-1 ($9114-5) and 37144-5 ($9118-9) when needed. These are 
VIA I's timers. 

For X-line handshaking, an erroneous (?) test for dataset ready at 
37152 ($9120) is performed, which will always be true. 

Two RS-232 buffers are allocated from the top-of-user-RAM 
space by calling MEMTOP 65139 ($FE73) to read and later set the 
pointers for top of RAM, after the top has been decremented by two 
pages. RS-232 pointers at 247-248 ($F7-F8), 249-250 ($F9-FA), and 
667-669 ($29B-29D) are initialized. 

62786 $F542 LOAD 

Load (or verify) to RAM from device number specified in 186 
($BA). 

The .X and .Y input parameters are the LSB/MSB address of the 
starting RAM to be loaded or compared. These are stored in 195-196 
($C3-C4) and a branch is performed off the vector in 816 ($330), 
normally returning to the next instruction of the routine. .A input 
parameter is for LOAD or 1 for VERIFY. Keyboard, screen, and 
RS-232 are illegal devices. 

Serial device activity is routed to the LOADSER* routine at 
62812 ($F55C), and tape functions are routed to the routine 
LOADTP* 62929 ($F5D1). 

The jump at 65493 ($FFD5) should be used to access this rou- 
tine to use the RAM vector at 816 ($330). 
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$F55C LOADSER'' 
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Load or verify RAM from a serial device. 

Serial devices are sent the filename and a secondary address of j j 

0, with some command bits on, and respond with a FILE NOT 

FOUND condition or a pointer of the location of where the data was 

saved from. This pointer at location 174-175 ($AE-AF) is overlaid j ( 

by 195-196 {$C3-C4) if a relocatable load was specified. Otherwise, '— ^ 
it is used as the address for the start of the load. The file from disk is 
then loaded to RAM. 

62929 SFSDl L9ADTP* 

Load or verify RAM from tape. 

The address to load the data to must be greater than 512 ($200) 
or the ILLEGAL DEVICE message will display 

PRESS PLAY is requested, if needed. Either the next filename is 
searched for by FAH 63407 ($F7AF) or the specified file is searched 
for by the routine FNDHDR 63591 ($F867). See the explanation of 
the tape header format at location 828 ($33C). The first byte of the 
tape header is tested (the tape I.D.). If the tape I.D. is 3 (a 
nonrelocatable tape) or if the I.D. is 1 and the secondary address in 
185 ($B9) is nonzero, the starting address for the LOAD comes from 
the second and third bytes in the tape header. However, if the tape 
I.D. is 1 and the secondary address in 185 ($B9) is 0, it uses the 
starting address specified in .X and .Y passed to the load routine. 

The ending address of the LOAD is calculated from the starting 
address plus the length saved in the tape header. 

The message LOADING or VERIFYING and the filename are 
displayed. LDBLK* 63689 ($F8C9) is called to read in the two pro- 
gram blocks. 

The routine TSTOP at 63819 ($F94B) will be calledto test for 
the STOP key. 

63947 $F647 SRGHING* 

Display SEARCHING message for tape device. 

If location 157 ($9D) allows Kemal control messages, the mes- j [ 

sage is displayed and falls through to the next routine. 
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$F659 FILENAME 

Display the filename. 

The filename pointed to by location 187-188 ($BB-BC) is dis- 

played by calling the CHROUT routine at 62074 ($F27A) for each j j 



u 



i 1 

n 
n 



63082 $F66A LDVRMSC* 

Display LOADING or VERIFYING message. 

The contents of location 147 ($93) are used to determine which 
message is appropriate. This routine calls SPMSG at 61922 ($F1E2) 
to do the actual displaying. 

63093 $F67S 8ilVE 

Save RAM to device number specified in 186 ($BA). 

.X and .Y are stored in 174-175 ($AE-AF) as the ending 
address. The zero page index in .A is used to move the starting 
address to location 193-194 ($C1-C2). The vector at 818 ($332) is 
jumped from, normally returning to the next routine. 

The jump at 65496 ($FFD8) should be used to access this rou- 
tine or the RAM vector at 818 ($332) for the next routine. 



$F692 SAVESEH 

Save RAM to serial device. 

An RS-232, screen, or keyboard SAVE displays ILLEGAL 
DEVICE message. 

A tape SAVE is routed to the routine SAVETP* 63217 ($F6F1). 

The rest of this routine handles serial devices. A check is made 
to insure that a filename is present, SAVING along with the 
filename is displayed, and the starting address of the SAVE is sent to 
the disk for recording with the data or program. The RAM between 
the start and end address is sent to disk by calling the ClOUT rou- 
tine at 61156 ($EEE4), with a test for the STOP key after every 
character sent. 

63217 $F6n SAVETP* 

Save RAM to tape. 

The tape buffer pointed to by 177-178 ($B1-B2) is checked to 
insure that it is not located below 512 ($200); otherwise, an 
ILLEGAL DEVICE error is displayed. PRESS RECORD AND PLAY 
is displayed if needed. SAVING and any filename is also displayed. 
The tape header I.D. is determined from the secondary address in 
185 ($B9) and placed in the tape header. An even secondary address 
results in a tape I.D. of 1 for a relocatable program, while an odd 
secondary address results in a tape I.D. of 3 for a nonrelocatable pro- 
gram. The routine TAPER 63463 ($F7E7) is called to write the tape 
header with the start and end address of the area saved, as well as 
the filename. 

Routine WBLK 63715 ($F8E3) is called to write a three-second 
leader onto the tape, followed by the save area in the format of two 
identical blocks separated by a short interblock leader. Finally, if the 
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secondary address has bit 1 on, an I.D. 5 (end of tape) header is L- ' 
written by calling TAPEH. 

Routine TSTOP 63819 ($F94B) is called to test for the STOP p - 

key. LJ 

Figure 3-1 at location 833-1019 ($341-3FD) shows a typical 
tape format. Refer to that diagram for details on each block written 

to tape. 1_J 

63272 $F728 SiWIIIG* 

Display SAVING message. 

If location 157 ($9D) allows Kemal control messages, this is dis- 
played by calling KMSGSHOW* 61926 ($F1E6); the routine 
FILENAME* 63065 ($F659) is called to display a filename. 

63284 $F734 UDTIM 

Increment the jiffy clock at 160-162 ($A0-A2). 

This updates the dock and resets it to after 24 hours. Location 
162 ($A2) is incremented every .01667 second (one jiffy; 1/60 
second). 

Location 37167 ($912F) is stored in 145 ($91) for STOP key test- 
ing purposes. 

The IRQ routine 60095 ($EABF) calls this routine every jiffy. 

Tape I/O interferes with accurate clocking and STOP key test- 
ing, although the routine TAPE periodically calls this routine. 

The NMI* 65193 ($FEA9) routine also calls this routine. 

The jump at 65514 ($FFEA) should be used to access this 
routine. 

63328 $F76G RDTIM 

Put jiffy clock from 160-162 ($A0-A2) into .Y, .X, and .A. 

This routine is called from LET 51621 ($C9A5) when TI$ is set 
in BASIC. 

The jump at 65502 ($FFDE) should be used to access this 
routine. 

63335 $F767 SETTIM Li 

Set time into jiffy clock 160-162 ($A0-A2) from .Y, .X, and .A. 

This is called from LET 51621 ($C9A5) when TI$ is set in [ / 

BASIC and should be accessed with the jump at 65499 ($FFDB). I— ' 

63344 $F77G STGP 

Check for STOP key in ($91), purge keyboard queue and channels LJ 

if so. 

Location 145 ($91) is checked for a value of 254 ($FE). The r - 

274 

Q 



UDTIM routine at 63284 ($F734) stores the current keypress in that 

location. 
r-t Bit 1 of .P (or location 783 ($30F) if SYS 63344 is used) will be 

' ' on if the STOP key was found; otherwise, .A contains the current 

keypress value from the STOP key keyboard row. 
;— r Tape I/O interferes with accurate clocking and the STOP key 

I 1 test, although the routine TAPE periodically calls this routine. 

The jump at 65505 ($FFE1) should be used to access this routine 

to use the RAM vector at 808 ($328). 

63358 $F77E nLEMSG'' 

I/O error file error message handler. 

Multiple entry points allow any particular error number to be 
displayed, depending on the point of entry. 

If location 157 ($9D) allows Kemal error messages, the message 
is displayed by calling KMSGSHOW* 61926 ($F1E6) and then 
CHROUT 62074 ($F27A) to display the error number. 

See location 61812 ($F174) for the assigned error numbers. 

63407 $F7AF FAH 

Tape: find next tape header, .X back contains header I.D. number. 

This finds the next tape header by calling RDTPBLKS* 63680 
($F8C0) to load the next header into the tape buffer. If the first byte 
in the buffer is not equal to 1, 3, 4, or 5, it keeps reading tape blocks 
until a header is found. 

If the header is not an I.D. 5 header, and location 157 ($9D) 
allows Kemal control messages, the Found message and the filename 
are displayed. 

See location 828 ($33C) for an explanation of the tape header 
I.D. meanings. 

Routine TSTOP 63819 ($F94B) is called to test for the STOP 
key. 



63463 $F7E7 

Tape: build an output tape header in the tape buffer area. 

.A into this routine contains the tape header I.D. 

The tape buffer is first cleared to all spaces. This routine then 
fills the tape buffer (pointed to by 178-179 ($B2-B3)) with the 
header I.D., the starting and ending address of the area saved, and 
the filename. The latter is pointed to by location 187 ($BB) for the 
length specified in address 183 ($B7). 

This routine calls LDADl 63572 ($F854) to temporarily (for this 
routine only) reset both 193-94 ($C1-C2) to the start of the tape 
buffer and 174-175 ($AE-AF) to the end-of-tape buffer. It also calls 
the routine WBLK 63715 ($F8E3) to write a ten-second leader and 
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the tape header in the buffer onto the tape in the format of two 
identical blocks, separated by a short interblock leader. 

TSTOP 63819 ($F94B) is called to test for the STOP key. i ] 

63S65 $F84D TPBUIA* 

Tape: load tape buffer address from 178-179 ($B2-B3) into .X and p, 

•Y. U 

This is called by tape routines whenever the tape buffer address 
is needed. 

63S72 $F854 LDADI 

Tape: set load/save starting and ending pointers to the tape 
buffer. 

TPBUFA* at 63565 ($F84D) is called to obtain the address of the 
tape buffer, which is then saved into the start-of-save pointer at 
193-194 ($C1-C2); 192 is added and saved in the end-of-save 
pointer at 174-175 ($AE-AF). 

LDADI is called by tape routines whenever the tape buffer 
address range is needed. 

63S9I $F867 FNDHDR'' 

Tape: find the tape header for a specified filename (or next). 

The routine FAH 63399 ($F7AF) is called by this to find the next 
tape header. If no filename was specified, then it returns to the caller 
since the next tape file has been found. If a filename was specified, 
the filename in the header to the desired name is compared to the 
length specified in 183 ($B7). If the two don't match, this routine 
loops until a match is found. 

TSTOP at 63819 ($F94B) is called for the STOP key test. 

63626 $F88A 1TP2D 

Tape: increment the tape buffer character counter. 

The count of the characters in the tape buffer counter at 166 
($A6) is incremented. It's then compared to location 192 ($C0) to - 

determine if the tape buffer is full. LJ 

63636 $F894 CSTEL 

Tape: display PRESS PLAY ON TAPE message. i_J 

The routine CSIO 63659 ($F8AB) is called to determine the tape 
button status and if necessary, KMSGSHOW* 61926 (F1E6) is called 
to display the message. This routine loops while waiting for a tape |_j 

button to be pressed. 

Location 63819 ($F94B) is referenced to test for the STOP key. 
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63SS9 sraju 

Tape: check tape's play /rewind /forward button status. 

Location 37151 ($91 IF), bit 6 is tested. A BEQ instruction (bit 1 
in .P is on) in the calling routine is taken if a tape button is pressed. 

63671 $F8B7 C8TE2 

Tape: display PRESS RECORD & PLAY ON TAPE message. 

This routine calls CSIO 63659 ($F8AB) to determine the tape 
button status and if needed, calls part of the CSTEL routine at 63642 
($F89A) to display the message and to loop while waiting for a but- 
ton to be pressed. 

63686 $F8C6 RDTPBLKS* 

Tape: initiate tape header read. 

The LDADl routine at 63572 ($F854) is called to set the load/ 
save starting and ending pointers to the tape buffer. Location 147 
($93) is also set, so that it indicates a load operation; it then falls 
through to the next routine. 

63688 $F8C8 RBLK 

Tape: read blocks from tape. 

This calls CSTEL 63636 ($F894) to display a PRESS PLAY ON 
TAPE message. IRQ interrupts are disabled to allow the changing of 
the IRQ vector so that tape routines are interrupt-proof. This also 
prepares parameters for and calls TAPE at 63732 ($F8F4) to enable 
an alternate IRQ vector to point to the routine READT 63886 ($F98E). 

6371S $F8E3 WBLK 

Tape: write blocks to tape. 

LDADl 63572 ($F854) is called to set the load/save starting and 
ending pointers to the tape buffer. Location 171 ($AB) is set by this 
to cause a short leader to be written, tape buffer to tape. 

The CSTE routine at 63671 ($F8B7) is called, which displays the 
message PRESS RECORD & PLAY ON TAPE; the IRQ interrupts are 
disabled to allow a changing of the IRQ vector so tape routines are 
interrupt-proof; parameters are prepared for; and TAPE 63732 
($F8F4) is called to enable an alternate IRQ vector to point to WRTZ 
64680 ($FCA8). This routine then falls through. 

63732 $F8F4 TAPE 

Tape: common tape read/write, start tape operations. 

TAPE disables all IRQ interrupts from VIA 2, the normal source. 
It calls RSPAUSE* 61792 ($F160) to disable any RS-232 NMI 
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interrupts and saves the current IRQ vector from location 788-789 
($314-315) to address 671-671 ($29F-2A0). See the latter location 
for additional information. 

The proper IRQ vector is set by a call to BSIV 64758 ($FCF6): 

• If called for a save to tape, enables timer 2 VIA2 interrupts and 
resets the IRQ vector to WRTZ 64680 ($FCA8). 

• For a load from tape, enables CAl VIA2 interrupts and resets the 
IRQ vector to 63886 ($F98E). 

This routine sets location 190 ($BE) to 2, the number of blocks 
to be saved or loaded, and calls NEWCH 64475 ($FBDB) to set up a 
new tape character. It turns on the tape motor by setting the proper 
bits in 37148 ($91 IC) and delays one-third second for the motor to 
gain speed. 

The IRQ interrupt is enabled so that the next IRQ interrupt calls 
WRTZ or READT. 

During tape processing, this routine loops while testing for the 
STOP key and updating the jiffy clock between IRQ interrupts. 
When the IRQ vector is finally reset to the default IRQ vector, the 
routine exits. 



$F94B TSTOP 

Tape: check for the STOP key. 

This routine calls the STOP key test routine STOP 63344 
($F770) and exits if the key has not been pressed. If the key has 
been pressed, this jumps to TNIF 64719 ($FCCF) to deactivate the 
tape IRQ vector and restore the normal vector. 

63837 SFOSD STTI 

Tape: set time limit for tape dipole. 

Timer 1 is set to a value which limits the amount of time the 
tape can be read before an IRQ occurs. This seems to be used to 
handle random errors, such as tape dropouts, preventing total 
disruption of a tape load as well as possibly allowing recovery. 
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$F98E READT \ ] 

Tape: read tape data bits into location 191 ($BF) (IRQ driven). '-' 

The time between CAl interrupt occurrences is determined for 
the current dipole. This dipole time is later used to determine 1 j 

whether the dipole just read is noise, 0, 1, or a word marker. 

When a word marker, which signifies the end of a byte, is 
found, this routine jumps to TPSTORE* 64173 ($FAAD) to handle 
the byte just received. 

If the bit just received is in error (for instance, a parity error), an 
error flag in 168 ($A8) is set. 
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64173 



The dipole timebase in 176 ($B0) is adjusted, based on the cal- 
culated value in 146 ($92); location 164 ($A4) is set to indicate 
which dipole was read. 

The value of the first dipole, which is also the bit value, is saved 
in location 215 ($D7). If both dipoles were 0, a leader bit has been 
read and location 150 ($96) is set to indicate the tape is either before 
or between blocks. 

If all eight data bits have not yet been received, the bit just 
received is rotated into the high order bit of address 191 ($BF). 

Sets location 182 ($B6) if any tape errors, such as parity or mis- 
matched dipoles, occurred during the reading of this byte. 

If the byte has been fully processed, the routine RTl* 65366 
($FF56) is branched to. 

Refer to location 146 ($92) for a description of a dipole; the 
location also includes Figure 1-2, which illustrates a square wave 
cycle. 



64173 SniAD 

Tape: determine if to store the input character from tape. 

This routine does a number of things. It starts looking for data if 
enough leader has been read, checks for a long block condition, and 
looks for a block countdown character, when one is expected. When 
a block countdown is found, is it the first or second block? Is the 
countdown character 1, indicating data is next? This routine also 
checks for a short block condition present. Has the end of the LOAD 
area been reached? 

TPSTORE* also determines whether currently reading block one 
or block two. 

If verifying, it compares the tape byte with RAM. If not equal, it 
sets location 182 ($B6) to indicate a verify error. 

If loading, the routine checks 182 ($B6) for error flags. If there 
are none, it stores the byte in RAM and proceeds. If an error is 
indicated, it stores the address in the error log at 256-318 ($100- 
13E) for attempted correction. The error index in 158 ($9E) is in- 
f~| cremented. If there are 31 errors, the read is aborted. 

' Error correction is attempted during the read of the second copy 

of the tape block, using the erroneous byte pointers. 
f~^ When both blocks have been processed, the IRQ vector is reset 

' ' to its normal default setting and a checksum (or parity) of the bytes 

that were just read is computed. This checksum should be equal to 
fmm^ the one that was read as the last byte of block two. If they're not 

; I equal, ST in 144 ($90) is set to indicate a checksum error. 
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$FBD2 RD300 ^ 

Tape: called to reset the tape read pointer. 

The tape read pointer in 172-173 ($AC-AD) is loaded from |_J 

193-194 ($C1-C2). 

6447S SFBDB NEWGH i j 

Tape: new tape character setup. ' — 

This is called to prepare for a new character for tape input or 
output. The bit count in location 163 ($A3) is reset to 8 and the 
following related fields are zeroed: 164 ($A4), 168 ($A8), 169 ($A9), 
and 155 ($9B). 

64490 $FBEA TPTOGLE* 

Tape: toggle the tape write line to invert the output signal. 

The tape write line is flipped, reversing the signal polarity being 
written to the tape. Depending on the entry point used to enter the 
routine, various values are used for timer 2 for the time of the next 
cycle. 



SFCOB BLKENB"^ 

Tape: end of block write processing. 

This is called by the routine WRITE* 64523 (FCOB) once the 
memory area and the checksum byte have been written for a block, 
in order to set the high order bit of 173 ($AD) on, writing an 
interblock leader. 

This then jumps to RTl* 65366 ($FF56) to end the interrupt exit. 

64S23 SFCOB WMTE* 

Tape: data write (IRQ driven). 

This is the routine called with each V1A2 timer 2 interrupt to 
actually write the cycles onto tape. This makes up two dipoles for 
each bit to be saved or for writing a word marker. A word marker is 
two long cycles, followed by two medium cycles. 

TPTOGLE* 64490 ($FBEA) is called for each cycle written. jj 

This also checks location 173 ($AD) to see if the high order bit 
is on, indicating the block SAVE is complete. If it is on, the routine 
goes to WRTN.1 64661 ($FC95) to write a leader. i i 

The value of the bit written in the first dipole is inverted so that ' — ' 
the second dipole will write the opposite value. For example, if the 
first dipole wrote cycles for values of 1-1, the second dipole will be , , 
0-0. Similarly, if the first half was 0-0, the second half is 1-1. Thus, LJ 
a bit value of 1 is represented by four cycles of 1-1 — 0-0, while a 
is represented by four cycles of 0-0 — 1-1. Bits are written with four 
cycles, while they are read during tape load as two dipoles. j j 
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A parity work bit based on the bit being written is updated by 
this routine. Location 189 ($BD) shifts right one bit, moving the next 
bit to be sent into bit 0. When all eight bits have been written 
(indicated by 163 ($A3) containing zero), the parity bit to be written 
is prepared, as is the next byte to be sent. If all bytes from the save 
area have been written, this writes the checksum byte and branches 
to the BLKEND* routine at 64518 (FC06). 

This routine jumps to RTl* 65366 ($FF56) to end the interrupt 
exit. 



$FG9S WRTNl 

Tape: block leader write (IRQ driven). 

This handles the end-of-block processing. If the second block 
was just saved, the tape motor is turned off by calling TNOFF 64776 
($FD08). 

If the first block was just saved, a long dipole is written, fol- 
lowed by 80 leader cycles. 

64680 $FCA8 WRTZ 

Tape: leader write (IRQ driven). 

WRTZ writes leader cycles to tape before blocks and between 
blocks. Leader cycles are very close to the length of time of the 
values written for data cycles, and are indeed considered O's when 
reading back the tape during tape load. 

This routine resets the IRQ vector to 64523 ($FCOB) and enables 
interrupts so the next IRQ caused by timer 2 goes to the WRITE* 
routine to write a data block. 

It also sets location 165 ($A5) to indicate that block countdown 
characters are to be written before actually writing the data from the 
save area to tape; it then jumps into the middle of the WRITE* rou- 
tine to write the block countdown characters. 

Address 190 ($BE) is tested for the completion of writing both 
blocks. If both are completed, this routine falls through. 

64719 SFGCF TNIF 

Tape: restore IRQ vector. 

The tape IRQ vector is deactivated and the normal vector is 
restored. This routine then calls TNOFF 64776 ($FD08) to stop the 
tape motor, changes location 37152 ($9120) back to scan for the 
STOP key, and restores the saved IRQ vector to 788-789 ($314-315) 
from location 671-672 ($29F-2A0). 

64758 $FCF6 B8IV 

Tape: reset the current IRQ vector. 

This calls TNIF 64719 ($FCCF), then depending on the 
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parameter passed in .X, sets the IRQ vector in 788-789 ($314-315) 
to one of the following addresses in the table at 65009 ($FDF1): 

63886 ($F98E) Read tape block M 

64680 ($FCA8) Write tape leader 
64523 ($FCOB) Write tape 

64776 $FD68 TN6FF ^ 

Tape: kill motor. 

Bits 3-1 of VIAl routine VIAIPCR* 37148 ($91 IC) are set to I's 
to stop the tape motor. 

64788 SFDll VPRTY 

Compare current to end of load/save pointers (tape and serial). 

This routine compares the pointer to the current load/save byte 
(172-173, $AC-AD) to the pointer to the end of the area (174-175, 
$AE-AF). The carry flag is cleared if the end pointer is greater than 
the current pointer. 

This is called to determine if the load/save action has 
completed. 

64788 SFDIB WRT62 

Increment current load/save pointer (tape and serial). 

One is added to the pointer which specifies the current load/ 
save byte in location 172-173 ($ AC-AD). 

64882 $FB22 START 

Power-on/reset routine (checks for autostart cartridge). 

The routine sets the stack pointer to an effective address of 511 
($1FF) and clears the 6502 decimal mode; calls CHKAUTO* 64831 
($FD3F) to check for an autostarting cartridge; branches to the 
address contained in 40960 ($A0OO) if found; calls INITEM* 64909 
($FD8D) to initialize memory and system contents; calls RESTOR 
64850 ($FD52) to set the system vectors; calls INITVIA* 65017 i i 

($FDF9) to initialize the 6522 VIA register; calls INITSK* 58648 U 

($E518) to initialize the 6560 VIC chip registers and screen; enables 
interrupts; and branches to the address contained in 49152 ($C000) . 

to start BASIC. U 

Location 65532 ($FFFC) contains the address of this routine for 
the 6502 to branch on when a 6502 RESET is detected. 

You can use SYS 64802 to perform the power-on/reset routine j_J 

(a cold restart) and SYS 64812 to skip the autostart cartridge test. 
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64877 



$FD3F CHKAUTO 

Check for an autostarting program at 40960 ($A000). 

This routine is called by the routines START 64802 ($FD22) and 
NMI* 65193 ($FEA9). 

Starting at address 40964 ($A004), this checks for the five 
characters AOCBM that are stored in location 64845 ($FD4D), setting 
the zero flag if found. See location 40960 ($A000) for more 
information. 



$FD4D AOCBM'' 

AOCBM characters with the high order bit on in the last three 
characters. $41,30,C3,C2,CD 



$FDS2 RESTOR 

Cause the RAM system vectors to be reset to provided defaults. 

This routine sets .X and .Y to the address of the provided system 
vector table at 64877 ($FD6D) and falls through to the next routine 
after clearing the carry flag in .P. 

A jump to this routine is provided at location 65418 ($FF8A). 

START 64802 ($FD22) and BREAK* 65234 ($FED2) both call 
this routine for power-on/reset and RUN/STOP-RESTORE keys 
processing. 



$F057 VECTOR 

Read or set system RAM vectors. 

Normally, this stores the 16 vectors from 64877-64908 ($FD6D- 
$FD8C) into the RAM vectors in locations 788-802 ($314-322). 

Entering this routine at location 64855 ($FD57) enables the carry 
flag of .P, which determines whether a read or set of the vectors is 
to be done. If carry is set, .X and .Y are used as the address where 
the vectors are copied to from the current contents of 788-802 
($314-322). If carry is clear, .X and .Y are used as the address of a 
user vector table that should be stored mto 788-802 ($314-322). 

A jump to this routine is provided at location 65421 ($FF8D). To 
modify one or more vectors, copy the RAM vectors to your user 
area, modify the vectors required, and then call for the user vectors 
to be copied to 788-802 ($314-322). 

04077 SFDOD VECTORO'' 

Default system vector address storage table. 

Routine RESTOR 64850 ($FD52) copies these 16 vectors mto the 
RAM vectors in location 788-802 ($314-322). See that area for 
details of the contents of this table. 
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64909 $FD9D miTMElf Li 

Initialize system memory. 

This zeros 0-255 ($0-FF) and 512-1023 ($200-$3FF). It sets M 

178-179 ($B2-B3) to point to the tape buffer at 828 ($33C) and starts 
looking for RAM from 1024 ($400) by calling the routine TSTMEM* 
65169 ($FE91). 1 I 

This sets the screen map memory page into 648 ($288). See that ' — ' 

location for additional details. 

The start of RAM pointer is set into 641 ($281) by calling the 
MEMTOP 65139 ($FE73) routine. See location 641 ($281) for further 
details of the possible values in that location. 

If RAM ends before 8191 ($1FFF), this goes into an error loop. 

START at 64802 ($FD22) calls this routine. 

6S009 $FDn IRQVCTRS* 

IRQ vectors table. 

64680 ($FCA8) Write tape leader 
64523 ($FCOB) Write tape 
60095 ($EABF) Normal default IRQ vector 
63886 ($F98E) Read tape block 

This table is used by the routine BSIV 64758 ($FCF6) to set or 
restore the IRQ vector in 788-789 ($314-315) to the needed address. 

65017 $FDF9 INITVIA* 

Initialize the 6522 VIA registers. 

37136-37151 ($9110-$911F) 6522 VIA Chip 1 
37152-37167 ($9120-$912F) 6522 VIA Chip 2 

See those locations for additional information. 

This routine is called by START 64802 ($FD22) and BREAK* 
65234 ($FED2) for power-on/reset and RUN/STOP-RESTORE keys 
processing. 

Initialization values are: 

Auxiliary control registers: 

timer 1: (free-running mode); output on PB7 disabled 

timer 2: set to an interval timer in one-shot mode 

shift register: disabled 

port B latch enable: to reflect the data on the pins 

port A latch enable: to reflect the data on the pins 

VIAl peripheral control register: 

CB2: manual output mode (CB2 held high) 

CBl: interrupt flag on a high-to-low transition 

CA2: manual output mode (CA2 held high) 

CAl: interrupt flag on a low-to-high transition 

VIA2 peripheral control register: 
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CB2: manual output mode (CB2 held low) 
CBl: intenupt flag on a high-to-low transition 

f-^ CA2: manual output mode (CA2 held high) 

I ^ CAl: interrupt flag on a low-to-high transition 

Data direction VIAl port B: input 

-«, Data direction VIM port A: input, except PA7 output 

I \ Data direction VIA2 port B: output 

Data direction VIA2 port A: input 
VIAl interrupt enable register: transition on CAl 
VIA2 interrupt enable register: timer 1 
VIA2 timer 1: 17033 ($4289) 



65097 $FE49 

The filename pointer and length are stored from .X, .Y, and .A. 

Prior to a LOAD or SAVE, this routine is used to set the desired 
filename information. 

The length is stored from .A into location 183 ($B7). A 
indicates that no filename is needed for tape. 

The pointer to the filename is stored from .X and .Y into 187- 
188 ($BB-BC). 

See all of these locations for additional information. 

The jump at 65469 ($FFBD) should be used to access this 
routine. 

6S104 $FE50 SETLFS 

Set the current file number, device, and secondary address. 

.A (file number) is stored into location 184 ($B8), .X (device 
number) is stored into location 186 ($BA), and .Y (secondary 
address) is stored into location 185 ($B9). A value of 255 ($FF) is 
used in the latter to indicate no secondary address. 

See these locations for additional information. 

Prior to a LOAD or SAVE, this routine is used to set the desired 
file and device information. 

The jump at 65466 ($FFBA) should be used to access this 
routine. 



65UI $FE57 

Reset RS-232 status, branch to 65128 ($FE68) for non-RS-232 
status. 

If the current device number in location 186 ($BA) is not a 2 
(signifying RS-232), this routine branches to location 65128 ($FE68). 
Otherwise, this zeros the RS-232 stahis in address 663 ($297). (The 
Commodore 64 Kernal returns the status in .A as well as zeroing the 
byte, but this was overlooked in the VIC and the .A returned is 
zeroed.) 
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Use RS=PEEK(663):POKE 663,0 to obtain the RS-232 status, 
not ST. 

The jump at 65463 ($FFB7) should be used to access this 
routine. 



$FE66 SETMSG 

Set the byte used to enable/disable Kernal message display. 

This stores .A into 157 ($9D) and falls through. See location 157 
($9D) for more details. 

The jump at 65424 ($FF90) should be used to access this 
routine. 



6S128 $FE68 

Load .A with the non-RS-232 I/O status ST. 

.A is loaded with the current contents of 144 ($90) and this rou- 
tine then falls through. See location 144 ($90) for more details. 

The jump at 65463 ($FFB7) should be used to access this 
routine. 

6SI30 $FE6A ORIOST* 

OR .A with the contents of 144 ($90) ST and store there. 

When reading the status information, the contents of 144 ($9A) 
have already been loaded into .A, so there is no effect. 

This routine can be used to add a status bit by loading .A with a 
value to be ORed with 144 ($90). 

The new value (or unchanged value) in .A is stored in 144 
($9A). 

See the device number, secondary address, and status code table 
in Appendix D. 

65135 SFEGF SETTMO 

Set timeout value for IEEE-488. 

This stores .A in 645 ($285). It's used only with an IEEE-488 
add-on card. A in bit 7 enables a 64 millisecond timeout value, 
while a 1 in that bit disables the timeout altogether. See location 645 
($245) for additional information. 

The jump at 65442 ($FFA2) should be used to access this 
routine. 

65139 $FE73 

Read or set the top of memory pointer. 

The carry flag in .P determines the action performed: 
Carry clear: 643-644 ($283-284) set to .X .Y contents. 
Carry set: .X .Y set to the contents of 643-644 ($283-284) 
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The jump at 65433 ($FF99) should be used to access this 
routine. 



n 65154 $FE82 

Read or set the bottom of memory pointer. 

r~[ The carry flag in .P determines the action performed: 

' ' Carry clear: 641-642 ($281-282) set to .X .Y contents. 

Carry set: .X .Y set to the contents of 641-642 ($281-282). 
The jump at 65436 ($FF9C) should be used to access this 

routine. 

85189 $FE91 TSTMEM* 

Test a memory location. 

TSTMEM* stores values in bits 6-0 of the byte pointed to by 
193-194 ($C1-C2) + .Y, after saving the contents of the byte. The 
original contents of the byte are restored after the testing is done. 

On exit, the carry flag in .P is clear if the memory location 
proved to be non-RAM and set if it is a RAM location. 

This routine is called by INITMEM* 64909 ($FD8D) when test- 
ing the limits of RAM. 

85193 $FEA9 HWt 

NMI handler routine. 

This routine processes RUN/STOP-RESTORE keys and VIAl 
timer interrupts. 

The 6502 chip jumps off the vector at 65530 ($FFFA) when an 
NMI is sensed. The vector points to this routine. 

After disabling the IRQ interrupts, a jump off the link at 792- 
793 ($318-319) is performed, normally continuing with the next 
instruction in tiie routine. 

The .A, .X, and .Y registers are saved on the stack. 

CHKAUTO* 64831 ($FD3F) is called and branches to the 
address contained in 40962 ($A002) if an autostart cartridge is found, 
whether the RUN/STOP key was pressed or not. 

If the VIAl interrupt enable register at 37149 ($91 ID) indicates 
that tiie interrupt is disabled, or the RESTORE key was pressed 
without the RUN/STOP key, then this branches to RTI* 65366 
($FF56). 

If the RESTORE key was not pressed, this goes instead to 
RSNMI* 65246 ($FEDE). 
— , UDTIM 63284 ($F734) is called to update the jiffy clock, then 

n calls the test STOP key routine STOP at 63344 ($F770). If the RUN/ 

STOP key was pressed with the RESTORE key, this falls through to 
the following BREAK* routine. Otherwise, it branches to RTI* 65366 
n ($FF56). 
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The vector at 65530 ($FFFA) should be used to access this 
routine. 



u 

- u 

u 

$FED2 BREAK* ^ 

BREAK interrupt entry. 

The BREAK* routine handles the BRK ML instruction ($00) and Qj 

RUN/STOP-RESTORE keys. You can cause a warm restart by 
SYSing 65234. 

RESTOR 64850 ($FD52) is called to reset the system vectors in 
RAM, INITVIA* 65017 ($FDF9) to reinitialize the 6522 VIAs, and 
INITSK* 58648 ($E518) to initialize the 6560 VIC chip registers and 
screen. This then branches to the address contained in 49154 
($C002) to perform a warm start of BASIC. 

A vector to this routine is provided at location 790-791 ($316- 
317). 

6S246 SFEDE RSNMf 

RS-232: NMI sequences. 

An interrupt on VIAl timer 1 is used for RS-232 bit trans- 
mission scheduling, VIAl timer 2 is used for RS-232 bit reception, 
and VIAl CBl is used for RS-232 reception of a new byte. 

This calls RSNXTBIT* 61347 ($EFA3) to send the next bit, or 
RSINBIT* 61494 ($F036) to receive an input bit. It performs baud 
rate calculations using 659 ($293) and the table at 65372 ($FF5C) in 
order to set VIAl timer 2 for the next bit to be sent or received. This 
falls through to the next routine. 

65366 $FF56 RTf 

Restore 6502 registers from the stack and return from interrupt. 



SFFSC RAUBTRL'' 

RS-232: VIA timer 2 values for baud rate table. 

If any of the NI (Not Implemented) values are chosen for the U 

baud rate specification in location 659 ($293), the RS-232 control 
register, values are retrieved past the end of this table using the 
following routine's instructions as values. This results in the baud If 

rate being set to less than 50. 

Q 

U 
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Table 9-S. Baud Rates and VlAl Timer 2 Values 



Baud 


VIAl Timer 2 Value 


50 


9.135 millisecond 


75 


6.060 millisecond 


110 


4.103 millisecond 


134.5 


3.337 millisecond 


150 


2.985 millisecond 


300 


1.447 millisecond 


600 


0.679 millisecond 


1200 


0.294 millisecond 


(1800) 2400 


0.166 millisecond 


2400 


0.102 millisecond 


3600 (NI) 




4800 (NI) 




7200 (NI) 




9600 (NI) 




19200 (NI) 





65394 $FF72 IRQROUT'' 

IRQ routine initial 6502 entry point. 

The 6502 chip uses the vector at 65534 ($FFFE) to branch upon 
when an IRQ is sensed. That vector points to this routine. Further 
IRQs are disabled by the 6502. 

The 6502 causes the program counter (MSB/LSB) and .P to be 
saved on the stack. This routine also places .A, .X, .Y, and the stack 
pointer on the stack. 

If the Break flag in .P is set, the vector at 790-791 ($316-317) 
that points to the routine BREAK* at 65234 ($FED2) is branched 
upon. Otherwise, the vector at 788-789 ($314-315) is used to branch 
to the routine IRQ at 60095 ($EABF). 

65413 $FF85 C4FFS* 

Five unused bytes of 255 ($FF). 

Location Range: 65418-65535 ($FF8A-$FFFF) 

ROM Vectors 

These contain a JMP opcode followed by the vector 



$FF8A 

Jump to 64850 ($FD52) RESTOR. 

65421 $FF8D 

JuMP to 64855 ($FD57) VECTOR. 



GVECT6R 
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$FF90 

JuMP to 65126 ($FE66) SETMSG. 

6S427 $FF93 

Jump to 61120 ($EECO) SECOND. 



CSETMSG 



CSECOND' 



u 
u 
u 

u 



65430 $FF96 

Jump to 61134 ($EECE) TKSA. 


CTKSA" 


— 


6S433 $$FF99 

Jump to 65139 ($FE73) MEMTOP. 


CMEMT8P* 




85436 $FF9G 

Jump to 65154 ($FE82) MEMBOT. 


GMEMBOT* 




65439 $FF9E 

Jump to 60190 ($EB1E) SCNKEY. 


CSCNKEY* 




65442 $FFA2 

Jump to 65135 ($FE6F) SETTMO. 


CSETTMO* 




65445 $FFA5 

Jump to 61209 ($EF19) ACPTR. 


CACPTB* 




65448 $FFA8 

Jump to 61156 ($EEE4) CIOUT. 


CGIOUt' 




65451 SFFAB 

Jump to 61174 ($EEF6) UNTLK. 


guntlk'' 




65454 SFFAE 

Jump to 61188 ($EF04) UNLSN. 


GUNLSN* 




65457 SFFBl 

Jump to 60951 ($EE17) LIS 1 EN. 


GLI8TElf 




65460 $FFB4 

Jump to 60948 ($EE14) TALK. 


gtalk'' 


— 


65463 $FFB7 

Jump to 65111 ($FE57) READST. 


GBOST* 


— 


6546t SFFBA 

JuMF to 65104 ($FE50) SETLFS. 


GSETLFS"^ 


— 
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6S469 SFFBD GSETNAlf 

Jump to 65097 ($FE49) SETNAM. 

I I The following are indirect JMPs off a RAM vector 

The RAM vectors can be set to go to your code 

n 65472 SFFGO 

Jump off 794-795 ($31A-31B) lOPEN. 

65475 $FFC3 

Jump off 796-797 ($31C-31D) ICLOSE. 

65478 $FFC6 INPGHN 

Jump off 798-799 ($31E-31F) ICHKIN. 

65481 $FFC9 6UTCHN 

Jump off 800-801 ($320-321) ICKOUT. 

65484 SFFCG GCLRCHN 

Jump off 802-803 ($322-323) ICLRCH. 

65487 $FFGF CINCH 

Jump off 804-805 ($324-325) IBASIN. 

The following contain a JMP opcode followed by the vector — 



65493 $FFD5 CL9AD 

Jump to 62786 ($F542) LOAD. 

65496 $FFD8 C8ilVE 

Jump to 63093 ($F675) SAVE. 

65499 SFFDB CSETTIlf 

Jump to 63335 ($F767) SETTIM. 

65592 SFFOE CRDTIM* 

Jump to 63328 ($F760) RDTIM. 

The following are indirect JMPs off a RAM vector 

The RAM vectors can be set to go to your code 

65595 SFFEl ISCNTC 

Jump off 808-809 ($328-329) ISTOP. 

65599 $FFE4 CGETL 

Jump off 810-811 ($32A-32B) IGETIN. 
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65SU $FFE7 

Jump off 812-813 ($32C-32D) ICLALL. 



The following have a JMP opcode 


followed by the vector 


— 


6SS14 SFFEA 

Jump to 63284 ($F734) UD IIM. 




GUDTIM* 





65S17 SFFED 

JuMP to 58629 ($E505) SCRN. 




C8GREEir' 




65S20 SFFFO 

Jump to 58634 ($E50A) PLOT. 




gplgt"^ 




65S23 $FFF3 

Jump to 58624 ($E500) lOBASE. 




GI6BA8E* 




65526 $FFF6 

Four unused bytes of 255 ($FF). 








The following fixed vectors are used by 


the 6502 chip 




65536 SFFni 

6502 vector to 65193 ($FEA9) NMI*. 




VGTRNMf 




65532 SFFFG 

6502 vector to 64802 ($FD22) START. 




VGTRR8T* 




65534 SFFFE 

6502 vector to 6 




VGTRIRQ* 
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Appendix A 

Using the Binary and 
Hexadecimal Memory 
Contents of the VIC-20 



This appendix will show you how to manipulate and use the 
information stored in the memory of the VIC-20 by demonstrating 
the typical, practical things you'll want to do with the memory con- 
tents. You'll also see some convenient tools to help you use and de- 
cipher the contents of memory. We'll concentrate on the practical 
aspects of pointer formats, setting and testing bits (Binary digiTS), 
and determining what an individual byte contains. The theory of 
why and how bytes contain information can best be addressed by 
other excellent references. If you are totally unfamiliar with the con- 
cepts of binary numbers and hexadecimal notation, you may want to 
consult an introductory work on those subjects. The practical 
application of the theories is the focus of this appendix; the tools 
provided, and your experience in using these tools, will help to show 
you the theories involved. 

Memory Contents 

Let's start our examples with the problem of determining what a 
memory location contains. PRINT PEEK(205) will display the deci- 
mal number equivalent of the binary contents of the eight-bit byte at 
location 205. When you look up that address in the memory map, 
you'll see that the content of memory location 205 is a cursor blink 
countdown. Let's suppose that the number 21 was displayed by the 
PEEK(205). (Since this memory location changes rapidly, you could 
see different numbers here at any point in time.) By consulting the 
code chart in Appendbc C, you can see that 21 is stored in the byte 
as the binary number 00010101, expressed in hexadecimal notation 
as 15. You'll also notice that 21 could be the screen POKE code of 
the letter U, or the 6502 operation code of ORA-ZX, depending on 
the location of the byte containing that number. If you were PEEK- 
ing in the BASIC or Kemal routines, there would be a good chance 
that the 21 represents the ORA-ZX operation code, while a PEEK to 
the screen RAM map would indicate that the letter U was stored 
there for display purposes. 

Type NEW on your VIC, then 10 GOTOIO, and press the 
ENTER key. Next, type in PEEK(4613) on an 8K+ expanded VIC or 
PEEK(4101) on an unexpanded VIC. The number 137 you now see 
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displayed is within the BASIC program area, as you can tell by look- 
ing up that memory location in the map. By consulting the section of 
Appendix B that describes the internal storage format of BASIC pro- : — 

grams, you'll see that the address you've PEEKed corresponds to the | | 

first byte of the first BASIC line, after the link and line number 

fields. The Appendix C code chart verifies that 137 is the token for 

the GOTO keyword in BASIC. 137 could also represent the f2 key [J 

being pressed, or the reversed letter / in the screen RAM map. The 

chart also shows you the binary and hexadecimal representation of 

137. Remember that the binary format is how the byte actually 

appears in memory, and that BASIC displays it in decimal format for 

your convenience. 

Manipulating Bits 

Now let's examine and manipulate bits within a byte. The most 
common bits that you'll want to change are in the 6560 VIC register 
at location 36879. This byte contains the selected background color 
in bits 7-4, the inverse color switch in bit 3, and the selected border 
color in bits 2-0. You may want to turn to the description of this 
byte in the map to familiarize yourself with its use. 

A few terms need to be defined before you begin working with 
bits. The term high order bit refers to bit 7 of a byte, and the term 
high order three bits refers to bits 7-5. The low order bits are those 
with lower bit numbers. The low order bit is bit 0, and the low order 
two bits are bits 1-0. A nybble is a half byte (four bits); usually it's 
clear which half byte is being discussed, as in the term low order 
nybble. Bits are numbered from left to right within a byte, from 7 to 
0. 

Table A-l. Bit PosiHons, Decimal /Hex Values 

Bit 7654 3210 

Dec 128 64 32 16 8 4 2 1 

Hex $80 $40 $20 $10 $08 $04 $02 $01 

If this is your first ej^osure to binary numbers, you may find f ( 

that it seems a bit confusing at first, but as you use the bits (as you ^ 
undoubtedly will), you'll find that using bit values becomes second 

nature. Refer to the VIC-20 Code Chart in Appendbc C for a com- pi 

plete table of each byte's binary, hexadecimal, and decimal numbers LJ 
if you get confused. 

As an example, you can check the background color location at — 

36879 to see what bits are set there. If you PEEK that location, you'll 1_] 
receive a number such as 27, which doesn't match the possible color 

codes for background colors. By looking up 27 in the code chart, 

U 
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' however, the binary column gives you the answer. Only one bit of 

the four high order bits is on, or set to 1 (0001); that's the fourth bit. 
fn As you can see from Table A-1, the fourth bit has a value of 16. To 

' ' determine the 0-15 color code that this represents, simply divide it 

by the rightmost bit of the high nybble; that bit is again the fourth 
r-f bit, which has a value of 16. 16/16 is 1, the color code for white. If 

i I thebitcombinationof the high nybble had been 0110, you could see 

from Table A-1 that bits 5 and 6 were on (indicated by a I). You 
simply add the bit values of these two on bits together (64+32=96), 
and then to determine the color code, divide that result by 16 (96/ 
16=6). Six is the color code for blue. 

A BASIC program you're running doesn't have the charts and 
tables to refer to, so how would it determine the current background 
color? The program could have variables set to all the possible 
combinations and test for each one, or it could use a formula to 
determine the value. Here are some bit testing and setting formulas 
for your programs. 

The variable BV is the Bit Value, BYTE is the target memory 
byte, and RSLT is the resuh of the formula. 

• To put BYTE bits 7-4 to RSLT bits 3-0 (this is the same as the 
divide-by-the-rightmost-bit-value solution discussed): 
RSLT=(PEEK(BYTE) AND 240)/16 

• To put BYTE bits 3-0 to RSLT bits 7-4: RSLT=(PEEK(BYTE) AND 
15)*16 

• To load RSLT with only bits 2-0 (for example): 
RSLT = PEEK(B YTE) AND 4+2+1 

• To determine if a particular bit is on or off: RSLT=(PEEK(BYTE) 
AND BV)/BV. RSLT=1 if the bit is on, or RSLT=0 if it is off. 

• To reverse the setting of a bit in BYTE: POKE BYTE,(PEEK(BYTE) 
AND 255 -BV) OR (1-(PEEK(BYTE) AND BV)/BV)*BV 

• To turn off a bit in BYTE: POKE BYTE,PEEK(BYTE) AND 255-BV 

• To him on a bit in BYTE: POKE BYTE,PEEK(BYTE) OR BV 

• To put a 1 or in RSLT back into a particular bit in BYTE: POKE 
r^ BYTE,(PEEK(BYTE) AND 255-BV) OR (RSLT*BV) 

I i The examples, formulas, the bit number/value chart, and the 

VIC-20 Code Chart should make your bit setting and testing a bit 
f— simpler. 

LSB/MSB Format 

Using addresses, vectors, links, and pointers is important when 
{"[ you're exploring the VIC computer. These are all stored in an LSB/ 

MSB (Least Significant Byte/Most Significant Byte) format. Again, 
the reasons for the existence of this format are less important, for the 
rn purposes of this discussion, than the methods for using the format. 
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The LSB/MSB format of pointers and BASIC line numbers can be 
decoded by using PTR=PEEK (LSB)+PEEK(MSB)*256. 

The VIC-20 Code Chart in Appendix C can be useful when 
decoding or composing this format of numbers. Look at the column 
on that chart labeled MSB ADDR. For any given contents of a byte, 
this column gives you the result of multiplying it by 256. If you were , — 

to PRINT PEEK(4), the number 209 would be displayed. Location 3- U 

4 is a pointer to a BASIC routine. To find the address of that routine, 
look up 209 in the Code Chart and note the MSB ADDR result of 
53504. Now by doing PRINT PEEK(3) you'll see that 170 is the LSB 
portion of the pointer. Adding 170 to 53504 gives us the address of 
the routine in decimal: 53674. Of course, in a program you would 
use PTR=PEEK(3)+PEEK(4)*256. 

Going the other way with this conversion technique is necessary 
when you're setting up location 1-2 for an upcoming USR instruc- 
tion, for instance. If the target routine just happened to be at location 
53674 (it wouldn't be, but this allows a clearer example), you would 
look in the Code Chart for the last line in the MSB ADDR column 
that has a value less than 53674. You should find it to be 53504, 
which is on the line for the decimal number 209. Now subtract 
53504 from 53674 and you have the LSB number of 170; the MSB 
number is the 209 you found on the VIC-20 Code Chart. In a pro- 
gram you would compute these LSB and MSB numbers by: POKE 
2,INT(53674/256):POKE 1,53674 -(PEEK(2)*256). Using these tech- 
niques, you should have no problems using and setting LSB/MSB 
format pointers and numbers. 

The program below includes routines that can be used in your 
own programs to perform conversions between decimal, binary, and 
hexadecimal numbers up to two bytes in length (0-65535, $0-FFFF). 
These routines are part of a program to display the contents of mem- 
ory in all three number systems, and in character format, as well as 
the address of the location in both hexadecimal and decimal. This 
program will be useful for performing number conversions and 
displaying memory contents of the VIC-20 as you explore and use 
the map information. 

On an unexpanded VIC-20, this program should be entered in j ~( 

an abbreviated form. For the unexpanded VIC-20, eliminate lines ^ 

1000-1250, all REM statements, and lines containing only a colon 
mark. No GOTO, THEN, or GOSUB statements reference these pj 

lines. In addition, embedded spaces outside of quotes may be omit- I ! 

ted. The number of statements per line has been kept to a minimum 

to improve the readability of the program. ■ — ■ 

The lines containing the subroutines for number conversions are | | 

clearly marked, and the variables used as input and output by each 

of the subroutines are indicated. 
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Progmn A-l. Niunbei Conversion 

1000 GO TO 1260 {3 SPACES }[ BYPASS NON-REM'ED HEADE 

R ] 
1010 : 
1020 "{18 SPACES }gAi ************ 

isi 

1030 "{18 SPACES} -NUM. BASE. MAP- 
1040 "{18 SPACES )Iza ************ 

1050 : 

1060 MAPPING THE VIC-20 { 7 SPACES }G.R. DAVIES 

{11 SPACES}8/8/B3 
1070 : 
1080 CONVERTS DEC OR HEX TO DEC/HEX/BIN AND DISPLA 

YS MEMORY 
1090 BYTES IN DECIMAL, HEXADECIMAL, BINARY, AND CH 

ARACTER. 
1100 : 
1110 "ENTER ? AT THE PROMPT FOR RESPONSE FORMATS A 

ND HELP. 
1120 : 
1130 : 
1140 ***** NUMBER * CONVERSION * SUBROUTINES * 

* * * * 

1150 *{51 SPACES}* 

1160 *{2 SPACES} DECIMAL TO HEXADECIMAL: { 3 SPACES}L 

INES{2 SPACES}2620 - 2730{5 SPACES}* 
1170 *{51 SPACES}* 
1180 *{2 SPACES} HEXADECIMAL TO DECIMAL: {3 SPACES}L 

INES{2 SPACES} 2490 - 2590 {5 SPACES}* 
1190 *{51 SPACES}* 
1200 *{2 SPACES} DECIMAL TO BINARY: {8 SPACES}LINES 

{2 SPACES} 2760 - 2880 {5 SPACES}* 
1210 *{51 SPACES}* 
1220 ***** NUMBER * CONVERSION * SUBROUTINES * 

* * * * 

1230 : 

1240 : 

1250 REM ***** TITLE FRAME ***** 

1260 PRINT"{CLR}{RVS}{2 SPACES} DECIMAL-HEX-BINARY 

{6 SPACES} BASE CONVERTER {6 SPACES} AND MEMORY 

{SPACE}DISPLAY{2 SPACES}" 
1270 : 
1280 : 

1290 REM ***** MAIN PROMPTER ***** 
1300 PRINT" {RVS} ENTER: {OFF} NUMBER{16 SPACES}NUMBE 

r{rvs}.{off}bytes{6 spaces}"; 

1310 PRINT" { RVS}? {off} FOR INSTRUCTIONS 
1320 PRINT" {3 SPACES} { RVS }Q {OFF} TO QUIT." 
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1330 : U 

1340 : 

1350 REM ***** GET RESPONSE AND CHECK ***** --_. 

1360 INPUT N$ M 

1370 N1$=LEFT$(N$,1) 

1380 IF Nl$="?" THENGOSUB2920 : GOTO1300 

1390 IF N1$="Q" THEN END T~, 

1400 : LJ 

1410 REM * EXTRACT $ * 

1420 IF Nl$="$" OR (Nl$>"/" AND Nl$<":") GOTO 1460 

1430 PRINT "{RVS}*ERROR*{ OFF} "Nl$" IN "N$" MUST BE 

A $ OR DIGIT" : GOTO1360 
1440 : 

1450 REM * N2$=DIGITS ONLY, NO $ OR DOT * 
1460 N2$=N$ 

1470 IF Nl$="$" THEN N2$=MID$ (N$, 2 ) 
1480 : 

1490 REM * FIND ANY DOT IN ENTRY * 
1500 DOT=0 

1510 FOR X=l TO LEN(N2$) 
1520 IF MID$(N2$,X,1)="." THEN DOT=X 
1530 NEXT 
1540 : 

1550 REM * SPLIT OUT ANY BYTE COUNT * 
1560 IF DOT=0 GOTO 1610 
1570 N3$=MID$(N2$,DOT+l) 
1580 N25=LEFT$(N2$,DOT-l) 
1590 : 

1600 REM * ROUTE HEX/DEC CONVERSIONS * 
1610 IFN1$="$"GOTO1920 
1620 : 
1630 : 

1640 REM ***** DECIMAL TO HEX CONVERSION ***** 
1650 REM * VALIDATE DEC * 
1660 F0RX=1 TO LEN(N2$) 
1670 X$=MID$(N2$,X,1) 
1680 IF X$<"0" OR X$>"9" GOTO 1710 
1690 NEXT : GOTO1730 

1700 REM (RESET LOOP) j ( 

1710 FOR X=0 TO : NEXT i-J 

1720 PRINT" {RVS}*ERROR*{OFF} "X$" IN "N2$" IS NOT 

(SPACE) A DEC DIGIT" : GOTO 1360 - — 

1730 N2=VAL(N2$) |_] 

1740 IF N2<65536 GOTO 1760 
1750 PRINT "{RVS}* ERROR* {OFF} "N2$" IS ABOVE 65,535 

" : GOTO 1360 
1760 DE=N2 
1770 : 
1780 REM * RE-ROUTE BYTE DISPLAY * 
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1790 IF DOT>0 GOTO 2210 

1800 : 
i— 1 1810 REM * DO DEC->HEX->BIN * 
I ] 1820 D=DE 

1830 GOSUB2660 

1840 HE$=H$ 
n 1850 D=DE 

1860 GOSUB2800 

1870 PRINT" {BLK}DEC="N2; "HEX=$"H$ : PRINT "BIN"B$" 
{BLU}" 

1880 GOTO 1360 

1890 : 

1900 : 

1910 REM ***** HEXADECIMAL TO DECIMAL CONVERSION * 

1920 REM * VALIDATE HEX * 

1930 FOR X=l TO LEN(N2$) 

1940 X$=MID$(N2$,X,1) 

1950 IF X$<"0" OR X$>"F" OR (X$>"9" AND X$<"A") GO 

TO 1980 
1960 NEXT : GOTO2000 
1970 REM (RESET LOOP) 
1980 FOR X=0 TO : NEXT 
1990 PRINT" {RVS}* ERROR* {OFF} "X$" IN $"N2$" IS NOT 

A HEX DIGIT (0-9, A-F).": GOTO 1360 
2000 IF LEN(N2$)<5 GOTO 2040 
2010 PRINT "{ RVS }*ERROR*{ OFF} $"N2$" IS ABOVE $FFFF 

": GOTO1360 
2020 : 

2030 REM * DO HEX->DEC * 
2040 HE$=RIGHT$("000"+N2$,4) 
2050 H$=HE$ 
2060 GOSUB 2530 
2070 DE=D 
2080 : 

2090 REM * RE-ROUTE BYTE DISPLAY * 
2100 IF DOT>0 GOTO 2210 
2110 : 

2120 REM * DEC TO BINARY * 
2130 GOSUB 2800 
2140 PRINT" {BLK}DEC="DE;"HEX=$"HE$:PRINT"BIN"B$" 

{BLU}" 
2150 GOTO 1360 
2160 : 
2170 : 

2180 REM ***** DISPLAY MEMORY CONTENTS ***** 
2190 REM * DISPLAY THE BYTE ADDRESS * 
2200 REM * DECIMAL TO HEXADECIMAL * 
2210 FOR CNT=0 TO VAL(N3$)-1 
2220 D=DE 
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2230 GOSUB 2660 

2240 HE$=H$ 

2250 PRINT "{BLK}{RVS} AT "DE"{LEFT} $"HE$"{BLU} 

{OFF}" 
2260 : 

2270 REM * GET AND CONVERT THE BYTE CONTENTS * 

2280 BYTE=PEEK(DE) j ( 

2290 D=ByTE ^^ 

2300 GOSUB 2660 

2310 D=BYTE 

2320 GOSUB 2800 

2330 H$=RIGHT$(H$,2) 

2340 B$=RIGHT$(B$,9) 

2350 : 

2360 REM * FORM CHR$() * 

2370 X$="{ SHIFT-SPACE}" 

2380 IF (BYTE>31 AND BYTE<128) OR BYTE>160 THEN X$ 

=X$+CHR$(BYTE) 
2390 BY$=RIGHT$(" "+STR$ (BYTE)+" ",4) 
2400 : 

2410 REM * SHOW THE CONTENTS * 
2420 PRINT"{BLK}"BY$;"$"H$" " ;B$ ;X$"{BLU} " 
2430 DE=DE+1 

2440 REM WRAP AROUND TO AT 65535 
2450 IP DE>65535 THEN DE=0 
2460 NEXT : GOTO1360 
2470 : 
2480 : 
2490 REM ##### HEXADECIMAL TO DECIMAL CONVERSION S 

UBROUTINE ##### 
2500 REM{3 SPACES} VARIABLES: IN= H$ (FOUR HEX DIGI 

TS, WITH LEADING ZEROS) 
2510 REM{3 SPACES} VARIABLES: OUT=D (0-65535) 
2520 REM{3 SPACES }THIS ROUTINE DESTROYS H$ 
2530 D=0 

2540 FOR X=l TO 4 
2550 D%=ASC(H$) 
2560 D%=D%-48+(D%>64)*7 

2570 H$=MID$(H$,2) \J 

2580 D=16*D+D% 
2590 NEXT : RETURN 

2600 : V I 

2610 : U 

2620 REM ##### DECIMAL TO HEXADECIMAL CONVERSION S 

UBROUTINE ##### 

2630 REM{3 SPACES} VARIABLES: IN= D (<65536) M 

2640 REM {3 SPACES} VARIABLES: OUT= H$ (FOUR HEX DIG ^"^ 

ITS) 
2650 REM{3 SPACES }THIS ROUTINE DESTROYS D r- 
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2660 
2670 
2680 
2690 
2700 
2710 
2720 
2730 
2740 
2750 
2760 

2770 
2780 

2790 
2800 
2810 
2820 
2830 
2840 
2850 
2860 
2870 
2880 
2890 
2900 
2910 
2920 

2930 

2940 

2950 

2960 

2970 
2980 

2990 

3000 



H$="" 

D=D/4096 

FOR X=l TO 4 

D%=D 

X$=CHR$(48+D%- (D%>9) *7) 

H$=H$+X$ 

D=16*(D-D%) 

NEXT : RETURN 



REM ##### DECIMAL TO BINARY CONVERSION ROUTINE 

##### 
REM{3 SPACES } VARIABLES : IN= D (0-i65535) 
REM{3 SPACES} VARIABLES: OUT =B$ (0000.0000 00 
00.0000) 

REM{3 SPACES }THIS ROUTINE DESTROYS D 
X$="0" 

IP D>32767 THEN X$="l" : D=D-32768 
FOR X=14 TO STEP-1 
Y=2tX 

X$=X$+RIGHT$(STR$( (DANDY) >0),1) 
NEXT 

B$=LEFT$ (X$ , 4) +" . "+MID$ (X$ , 5 , 4) +" " 
B$=B$+MID$ (X$ , 9 , 4) +" . "+RIGHT$ (X$ , 4) 
RETURN 



REM ***** HELP FRAME ***** 

PRINT" {CLR}{RVS} TO CONVERT: {OFF } ENTER THE DE 

CIMAL NUMBER OR {RVS}${0FF}" 

PRINT"AND THE HEXADECIMAL" : PRINT" (EX. 1024 OR 

$400 ) " 
PRINT" {2 SPACES} WITH A MAXIMUM OP {5 SPACES} 65 
535 AND $FFFP."; 

PRINT" {4 SPACES} LEADING ZEROS MAY BE 
{2 SPACES }OMITTED." 
PRINT" {RVS}TO DISPLAY: {OPP} ENTER DEC OR $HEX 

ADDRESS {RVS}.{OFP} AND" 
PRINT"THE NUMBER OP BYTES TODISPLAY"; 
PRINT" (EX. $33C.10{2 SPACES}WILL DISPLAY 10 B 
YTES AT 828 $33C 

PRINT "IP NO NUMBER ENTERED AFTER {RVS}.{0FF} 
{ SPACE }THEN 1 ASSUMED. 
RETURN 



303 



u 

Appendix B q 

BASIC Aiea Pointers and 
Internal Storage Formats of U 
Variables and Lines q 



BASIC Area Pointers 

The area of memory the VIC-20 uses for storage of a BASIC program 
and its variables is located at varying location ranges, depending on 
the amount of expansion memory added to the VIC-20. (Appendix E 
explores the subject of relocation of VIC-20 memory by the system 
or the user.) Regardless of the actual memory location range used for 
the BASIC storage area, certain pointers in low memory are used by 
BASIC to point to the limits of the BASIC area and to divide the 
area into several sections. These consist of several variable storage 
areas, an area for the BASIC program itself, and an unused area that 
is available for use by BASIC during program execution. Each of 
these areas, or pools, can expand or contract, with a few exceptions, 
by simply altering the pointers to the pool and moving any contents 
to the proper new location. This may involve moving an entire vari- 
able pool. 

After the Kemal has initialized the VIC, the range of the BASIC 
area is pointed to by: 

• 43-44 ($2B-2C) start of the BASIC area. On an unexpanded VIC- 
20 this pointer contains the address of 4097 ($1001). 

• 55-56 ($37-38) end of the BASIC area. The unexpanded VIC-20 
has an address of 7680 ($1E00) in this location. 

The Kernal uses a (Afferent set of pointers to keep track of the 
top and bottom of the RAM space that contains the BASIC areas 
641-642 ($281-282) and 643-644 ($283-284). BASIC has no effect 
on these Kemal pointers. 

Additional pointers are maintained by BASIC to point to the j j 

boundaries of each type of variable pool: ' — ' 

• 45-46 ($2'D-2E) start of the scalar (nonarray) variable pool. 

• 47-48 ($2F-30) start of the array variable pool. j' j 

• 49-50 ($31-32) start of the free area. 

• 51-52 ($33-34) bottom of the string variable pool. 

The BASIC area may be reduced at the top and/or bottom by [_] 
adjusting the pointers at 43-44 and 55-56. This is useful when a 

machine language (ML) program or data such as screen maps and 

custom character sets is to be placed in the user RAM area without f : 



304 



U 



Appendix B 



BASIC destroying the information. After adjusting the top of BASIC 
pointer at 55-56, a CLR statement should be used, which will cause 

n all the current BASIC variables to be lost. A NEW statement is 

needed after adjusting the pointer at 43-44, causing the current 
BASIC program and variables to be lost. You can refer to a program 

'H at location 55-56 that reserves space at the top or the bottom of the 

' ■ BASIC area by resetting the pointers. • 

Advanced users can manipulate the pointers at 43-44 and 55-56 
to do such things as allow multiple BASIC programs in RAM at one 
time, place the BASIC area in the 40960 ($A0OO) ROM area, append 
routines from other programs, and a variety of other techniques. The 
actions that NEW and CLR perform are described in more detail at 
their respective routine addresses in the map. 

Once a BASIC program has been loaded into the BASIC area, 
the pointer at 45-46 is set to point one byte past the end of the 
BASIC program. The scalar variable pool will be started at this 
address when the program is RUN. If additional lines are added to 
the program, this pointer is pushed up as the lines are stored in their 
proper line number sequence within the BASIC program area. 
Higher numbered BASIC statements are pushed up to create room 
for the new statements. Additionally, adding or changing BASIC 
lines causes any variables still in the variable pools from a previous 
RUN to be lost. 

When RUN is entered, BASIC begins to allocate space from the 
various variable pools to accommodate the variables defined in the 
program. 

As an example. Figure B-1 shows the pointer relationships after 
RUN was entered and the STOP key was pressed on an unexpanded 
VIC-20, with the location in parentheses showing the result of enter- 
ing a direct mode FRE(O) that returned 235 bytes to the free area. 

Flgura B— I. Pointer Relationships 

Pointer Area Use Location 

r-| 55-56- + + 7680 

' ! String Pool 

51-52 -* + + 7323 (7558) 

_^ Free Area 

i i 49-50-* + + 6201 

Array Pool 

47-48 - + + 6070 

p, Scalar Pool 

45-46- + + 6000 

BASIC program 
F-i 43-44- + + 4097 



305 



u 

Appendix B y 

n 

When variables such as scalar variables, function descriptors, or 
string descriptors that point to the string in the string pool or BASIC 
program are added to the scalar pool, all entries in the array pool i "/ 

must be pushed up seven bytes (the size of all variables or descrip- '— ' 

tors stored in the pool) into the free area. Added arrays decrease the 
amount of the free area from the bottom, while strings stored in the j— j 

string pool decrease the free area from the top. Since adding or LJ 

changing a BASIC program clears the variables, no pushing up of 
variables is involved. 

A CLR statement causes the pointer at 51-52 to be the same as 
55-56, eliminating the boundary for the string pool. Then the point- 
ers at 47-48 and 49-50 are overlaid with the address that is in the 
pointer at 45-46, eliminating the other pool boundary pointers. The 
only pointer of the group that has gone untouched is the pointer at 
45-46, which specifies the end of the BASIC program. 

The variables in the pools do not need to be erased since they 
will be simply overlaid when the space they occupy is needed. A 
NEW statement causes the pointer at 45-46 to be overlaid by the 
pointer at 43-44. In addition, the end of program three-byte in- 
dicator is placed at the beginning of the BASIC program area. Loca- 
tion 43-44 in the memory map explains how to recover your 
program from an unintentional NEW statement. 

BASIC Statement Storage 

BASIC program lines are stored in the program area in a compressed 
format, called tokenized. Each line is preceded by a two-byte link 
field that points in LSB/MSB format to the next BASIC line's link 
field. (If you're unfamiliar with the LSB/MSB format, refer to 
Appendix A for a short explanation.) Following the two-byte link 
field is a two-byte line number field in LSB/MSB format, then the 
tokenized BASIC line, ended with a byte containing 0. 

The last BASIC program line has a link field that points to a 
dummy liiUc field of two bytes of zeros. This is the end-of-program 
indicator that the pointer in 45-46 points just beyond for the start of 
the scalar variable pool. 

The tokenization of BASIC program lines replaces BASIC [ I 

keywords with a one-byte shorthand. You can see what these tokens 
are by looking at the VIC-20 Code Chart in Appendix C. Variable 
names, character strings, and line number references (for instance, \'l 

GOTO 2000) are not tokenized. The stored BASIC lines appear as l-J 

shown in Figure B-2. 

BASIC Scalar Variables U 

Integer scalar variables. The seven-byte field for an integer variable 

is stored in the scalar variable pool in the format illustrated in Figure — 

B-3. L) 
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ngura B-2. Stofed BASIC lines 



Link-field 
LSB MSB 


Line-number 
LSB MSB 


BASIC 
line.... 






I I 



Link-field 
LSB MSB 


Line-number 
LSB MSB 


BASIC 

line.... 






Link-field 
00 



End of program 



ngwe B-3. Integei Scalar Variables 



CHARl 
-i-128 


CHAR2 

-1-128 


MSB 


LSB 


000 



I ■, 



n 



The characters occupying the first two bytes of the seven-byte 
variable contain the first two characters of the variable name, with 
128 added to the ASCII value of both characters. If the variable has 
a name of one character (for example, Y%), the second character in 
the variable is simply the value of 128. The percent sign is not 
stored since the 128 added to each character identifies the variable as 
an integer type. The actual value that the integer variable is set to is 
in MSB/LSB format, a departure from line number and pointer LSB/ 
MSB format. The value is stored in binary with a negative number 
indicated by the value having the high order bit on and the rest of 
the number in two's complement form (the individual bits are 
reversed and 1 is added). The valid range for an integer number is 
-32768 to 32767. For example, A%=2797 would be stored as 
detailed in Figure B-4. 

ngura B— 4. Integei Variable Example 



A 


% 












charl 
193 


char2 
128 


MSB 
10 


LSB 
237 















( 10 * 256 ) + 237 = 2797 

Floating point scalar variables. The seven-byte field for a floating 
point variable is stored in the scalar variable pool in the format 
shown in Figure B-5. 
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Figiira B-S. Floating Point Scalar Variables 



CHARl 
+0 


CHAR2 
+0 


EXP 


MANTl 


MANT2 


MANT3 


MANT4 



The first two bytes of the seven-byte variable contain the first 
two characters of the variable name. If the variable has a one- 
character name such as R, the second character in the variable is 
zero. The variable is in exponent and four-byte mantissa form. For 
example, the number 1.41421356 is stored as 129 53 04 243 52. 
You'll better understand this after we examine the parts of a floating 
point number. 

Floating point exponent. The exponent of a floating point number 
specifies the direction and magnitude that the decimal point (actually 
the binary point) must be shifted (in number of bits) to obtain the 
actual value, much like the scientific notation of numbers. A right 
shift of one bit position of the binary point is expressed as 129 (1 4- 
128), while a left shift of one position would be 127 (-1 -I- 128). A 
right shift of 127 positions results in an exponent value of 255 (127 
+ 128), while a left shift of 128 is expressed as an exponent of 
(—128 + 128). However, a exponent is actually used to indicate a 
zero floating point number, since normalization of the exponent 
results in a exponent only for a floating point number. 

Floating point mantissa. The high order bit of the first byte of the 
mantissa is used as a sign bit, indicating a positive number and 1 a 
negative number. In scientific notation, 2,827,381.66 could be 
expressed as .282738166 E7. This means that the decimal point is to 
be shifted right seven positions or that ten to the seventh power 
(10,000,000) is to be multiplied by the number. The number before 
the E is called the mantissa. 

Hoating point numbers in the VIC-20 have a mantissa expressed 
as a binary number, so the number is multiplied by two to the expo- 
nent power. BASIC normalizes the mantissa so that the bit on the 
extreme left of the mantissa is the first significant bit (leading zero 
bits are discarded). The number five is 00000101 in binary, which is 
converted to 10100000 when normalized, and the exponent is set to 
record the number of significant bits. Three significant bits (101), for 
example, are stored in the exponent as 131 (3 4- 128 = 131). The 
mantissa of the number 5 would be stored as 160 00 00 00 in deci- 
mal, $A0 00 00 00 in hexadecimal, or 10100000 00000000 00000000 
00000000 in binary. The sign of the mantissa is placed in the high 
order bit of the first mantissa byte by storing a if the number is 
positive, or a 1 for a negative number. The result of our example is 
then 32 00 00 00, $20 00 00 00, or 00100000 000000000 000000000 



(J 
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000000000. Remember that the exponent byte had been set to 131 
($83) after the mantissa was normalized. 

When converting this format back to an unnormalized floating 
point number, the first byte of the mantissa is loaded into the float- 
ing point accumulator sign byte, where the 0-if-positive or 1-if- 
negative rule applies. The first byte of the mantissa is ORed with 
128 ($80), setting the bit that was used to hold the sign. Then the 
complete mantissa is loaded into the floating point accumulator. The 
mantissa is positive since the sign bit contains a 0. Because the expo- 
nent is greater than 128 (meaning a positive number), the mantissa 
binary point is shifted 131-128=3 bits to the right. This results in 
101.00000 00000000 which is the number 5 in decimal. 

The range of values that a floating point variable can be set to is 
approximately -H/- 1.701 E38 (exponent being positive or neg- 
ative). A floating point variable will be displayed in scientific nota- 
tion at approximately -I-/- 999,999,999.2. See Figure B-6 for a 
diagram of an example of a floating point mantissa's format and 
values. 

ngure B-8. Mantissa Example 







Y 


= 1.41421356 






CHARl 
89 


CHAR2 
00 


EXP 
129 


MANTl 
53 


MANT2 
4 


MANT3 
243 


MANT4 
47 



Floating Point Accumulatois 

The sb<-byte floating point accumulators at locations 97-102 ($61- 
66) and 105-110 ($69-6E) have a format much like the floating 
point scalar variables, except that the mantissa's sign is located in a 
byte of its own, freeing the high order mantissa bit for more pre- 
cision. The sign byte of the mantissa is set to for positive numbers 
and 255 ($FF) for negative numbers. The floating point accumulator 
format would look something like Figure B-7. 

Figiue B-7. Floattng Point Accumulator 



EXP 


MANTl 


MANT2 


MANT3 


MANT4 


SIGN 



n 
n 



For details of the exponent and mantissa bytes, see the explana- 
tion of the scalar floating point variables. 

Examples of floating point numbers in an accumulator in hexa- 
decimal notation are: 
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Table B— I. Floattig Pirint Numbers in an Accumulator 



umber 


Exp 


Ml 


M2 


M3 


M4 


Sign 





$00 


00 


00 


00 


00 


00 


.25 


$7F 


80 


00 


00 


00 


00 


.50 


$80 


80 


00 


00 


00 


00 


1 


$81 


80 


00 


00 


00 


00 


2 


$82 


80 


00 


00 


00 


00 


-1 


$81 


80 


00 


00 


00 


FF 


-10 


$84 


AO 


00 


00 


00 


FF 


lElO 


$A2 


95 


02 


F9 


00 


00 


2E10 


$A3 


95 


02 


F9 


00 


00 


4E10 


$A4 


95 


02 


F9 


00 


00 


1E38 


$FF 


96 


76 


99 


52 


00 


lE-38 


$02 


D9 


C7 


EE 


EE 


00 


lE-39 


$00 


AO 


00 


00 


00 


00 



Function Descriptors 

The seven-byte field for a function descriptor is stored in the scalar 
variable pool in the format shown in Figure B-8. 

Figure B— 8. Functton Descriptors 



CHARl 

+ 128 


CHAR2 
+0 


EXPRESSION 
LSB MSB 


VARIABLE 
LSB MSB 


FILL 
CHAR 



The first two bytes contain the first two characters of the vari- 
able name, with 128 added to the ASCII value of the first character. 
If the variable has a name of one character (for instance, FN F), the 
second character in the variable is 0. The expression pointer points 
to the description of the function in the BASIC statement with the 
DEF FN for the function. The variable pointer specifies the depen- 
dent variable in the scalar variable pool. The dependent variable in 
DEF FN A (C)=1267/RT, for example, is C. The fill character in the 
seventh byte is the first character of the expression after the = sign. 
It has no significance and is placed there only to fill out the format. 
For more detaUs about user functions, see locations 71-72 ($47-48), 
78-79 ($4E-4F), 54195 ($D3B3), and 54260 ($D3F4) in the memory 
map. 

Look at Figure B-9 for a moment for an example of a function 
descriptor, its format, and its values. 

ngure B-9. FiuicUon Descriptor Example 

DEFFNA(CV= 1267 / RT 



CHARl 
193 

310 



CHAR2 




EXPRESSION 
14 16 



VARIABLE 
39 18 



FILL 
49 
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At location 4647 (18*256+39) we would find the floating point vari- 
able C to be 67 0. 

String Scalar Variables 

The seven-byte field for a string descriptor is stored in the scalar 
variable pool in the format illustrated in Figure B-10. 

Figure B—IO. SWng Desciiptor 



CHARl 
+0 


CHAR2 
-1-128 


LENGTH 


POINTER 
LSB MSB 


00 



The first two bytes of the descriptor contain the first two charac- 
ters of the variable name, with 128 added to the ASCII value of the 
second character. If the variable has a name of one character (for 
example, S$), the second character in the variable is set to the value 
of 128. The dollar sign is not stored as part of the name. 

The length byte contains the current length of the string. The 
pointer to the string points to either the BASIC statement string defi- 
nition (for instance, S$= "STRING") or to the location of the string 
in the string pool. Strings may be transferred to the string pool from 
the program by modifjdng them in any way, such as S$=S$+"" 
Take a look at Figure B-11 for an example of a string descriptor, its 
format, and its values in that format. 



ngure B-U. SMng Descriptor Example 



S$ = "STRING" -I-"" 



CHARl 

83 



CHAR2 
128 



LENGTH 
6 



POINTER 
25029 



Since the string was modified during its definition, it has been 
stored in the string variable. 



Array Variables 

The array variables stored in the array pool share a common format 
of header information, as illustrated in Figure B-12. 



Flgiue 


B-12. 


BASIC Anay Variable fleadei 






CHARl 


CHAR2 


LENGTH 
LSB MSB 


DIMENSIONS 


SUBN 
MSB LSB 




SUBl 
MSB LSB 
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The first two bytes of the descriptor contain the first two charac- 
ters of the variable name, following the previously described conven- 
tions for scalar variables. The length bytes contain the total size of 
the array. The number-of-dimensions byte indicates how many sub- 
scripts must be used to reference the array, among other uses. There 
are then two bytes for every dimension (starting with the last and 
ending with the first) that contain the count of elements in the . 
dimension, plus one. These counts are in reverse format, MSB/LSB. 

Figure B-13 is an example of an array variable, complete with 
values. 

Figure B-13. Anay Example 

DIM AA(7,3,5) 



U 

u 
u 
u 
u 



CHARl 
65 


CHAR2 
65 


LENGTH 
203 3 


DIMENSIONS 
3 


SUB3 
06 


SUB2 
04 


SUBl 
8 



After the array descriptor header, the variables are stored in the 
formats previously described, but without any padding to fill out the 
seven bytes. An integer is stored in two bytes, a floating point num- 
ber in five bytes, and a string descriptor is stored in three bytes. The 
variables are stored in ascending order. For example, the variables in 
DIM G(l,l,2) would be stored in the order: (0,0,0), (1,0,0), (0,1,0), 
(1,1,0), (0,0,1), (1,0,1), (0,1,1), (1,1,1), (0,0,2), (1,0,2), (0,1,2), (1,1,2). 

When an array is defined, it's stored in the array pool above the 
scalar variables. VVTien the next scalar variable is to be created, all 
the arrays must be pushed up seven bytes to make room. Once a 
variable has been defined, it takes up pool space and is present until 
a CLR is issued. String variables can be redefined to a shorter length, 
but this frees storage space only if they were in the string variable 
pool and not being pointed to in the BASIC statement that defined 
them. The seven-byte descriptor for the string is still, obviously, in 
the scalar variable pool. 

The routine that locates variables starts searching for them at 
the start of the appropriate variable pool and works upward to the 
end of the pool. The time needed to find a variable can be reduced 
by defining it before other less-used variables. 
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This chart of VIC-20 codes will allow you to determine the appro- 
priate code number to use for achieving the desired control, screen, 
and character effects. Further, the chart allows the rapid translation 
of a code number into its various meanings within the VIC-20. 
You'll find the chart quite complete and easy to use. 

The chart lines are numbered from to 255 decimal on both 
sides of the page, with the equivalent hexadecimal number listed just 
inside the decimal number. 

The third and fourth columns list the character sets and asso- 
ciated control codes that correspond to the decimal and hexadecimal 
numbers on that line. Look at line 156 and you'll notice that a 
PRINT CHR$(156) will set the foreground color code to purple, 
while on line 169 we see that PRINT CHR$(169) will print a square 
halved diagonally, or a checkerboard square, depending on the 
character set that is currently selected. 

Line 14 shows that PRINT CHR$(14) will select the lowercase 
character set (labeled SET2 on the chart) and PRINT CHR$(142) 
enables uppercase mode (SETl). 

The special character codes recognized by the VIC 1515/1525 
printer are: 

Table C-1. VIC ISI5/I525 Printer Codes 

CHR$0 Meaning 



8 
10 


Graphic dot mode 
Linefeed 


13 
14 


Carriage return 
Double-sized characters 


15 


Normal-sized characters 


16 


Tab 


17 


Lowercase 


18 


Reverse on 


26 

27 

145 

146 


Repeat 

Dot addressing 
Uppercase 
Reverse off 



Consult the printer manual for further information regarding the 
use of these special printer codes. 

The column on the Code Chart labeled BASIC Token is used 
when examining the internal storage format of BASIC programs, 
either in memory, on tape, or on disk. 
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The Screen POKE column can be used to determine the needed 
code for a character when you're storing characters directly into the 
screen RAM map. There are sample programs (see location 4096, | | 

$1000) for converting between CHR$ and screen POKE codes, when 
you need to do this from within a program. 

The binary bit representation of any desired byte contents can I | 

be determined by consulting the Binary column for that hexadecimal ■ 

or decimal number. You'll find this useful when designing your own 
custom character sets; determining the effects of AND, OR, NOT, 
and WAIT operations; finding the number to use to set or turn off a 
particular bit in memory; as well as a host of other uses. Appendix B 
discusses number systems and includes a program to perform 
decimal/hexadecimal/binary conversions, as well as subroutines that 
you can include in your programs. 

True ASCII shows the interpretation of each character by a host 
computer or a non-CBM printer. In almost all cases. True ASCII is 
extended or modified, but it's important to understand the base 
character set. 

The ML 6502 operation code mnemonic that corresponds to 
each possible byte contents is listed under 6502 Opcode. Suffixes are 
appended to this column to denote the addressing mode implied. No 
suffix indicates that the instruction operates in the absolute, relative, 
or native addressing mode, depending on the instruction's purpose. 
A Z suffix indicates that zero page is referenced, and / is used to 
show an indirect addressing mode. Either I or Z can be accompanied 
with X or Y indexes. The absolute addressing mode also allows these 
indexes. An A suffix is present when the instruction operates on the 
accumulator, unless that is explicit in the operation code. IM marks 
the immediate-mode instructions. For example, ADC-IX indicates 
that indirect, indexed addressing is implied by the instruction. Some 
opcodes that are not listed can function as unsupported opcodes that 
do rather strange combinations of supported opcodes. These are not 
recommended, but it's often interesting to explore their effects. 

The column titled MSB is used to determine the MSB address of 
a two-byte LSB/MSB address. Look up the MSB number from the 
address. This column shows the result of multiplying the MSB byte ( | 

by 256. For example, the address 04/53 in LSB/MSB format would 
be resolved by looking up 53 in the chart (first determine if 04/53 is 
represented in hexadecimal or decimal — PEEK gives decimal results); I I 

53 decimal is MSB 13568 (53*256). Now simply add the 04 from the 
LSB and the address is complete: (135684-4=13572). This column 
can also be used to perform the reverse operation of changing an 
address like 47874 into 02/187 ($02/BB) LSB/MSB format. 
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Table G-1. VIC-20 Code Chart 







CHR$ 




BASIC Scieen POKE 


True 


6502 


MSB 




Dec Hex 


Set! 


Set2 


Token Setl 


Set2 


Binary ASCII 


Opcode 


Addr 




00 






Q 


Q 


0000.0000 NULL 


BRK 


00 


. 1 


101 






R 


■a. 


0000.0001 SOH 


ORA-IX 


256 


lm4 


2 02 






B 


la 


0000.0010 STX 




512 




3 03 






C 


c: 


0000.0011 ETX 




768 




4 04 






D 


d 


0000.0100 EOT 




1024 




5 05 


WHT 




E 


ffi- 


0000.0101 ENQ 


ORA-Z 


1280 




6 06 






!=• 


■r 


0000.0110 ACK 


ASLZ 


1536 




7 07 






t3 


•9 


0000.0111 BEL 




1792 




8 08 


DISABLE2 




H 


Hi 


0000.1000 BS 


PHP 


2048 




9 09 


ENABLE2 




I 


i 


0000.1001 HT 


ORA-IM 


2304 




10 OA 


LINEFEED 




J 


J 


0000.1010 LF 


ASL-A 


2560 




HOB 






K 


k 


0000.1011 VT 




2816 




12 OC 






I- 


1 


0000.1100 FF 




3072 




13 OD 


RETURN 




M 


m 


0000.1101 CR 


ORA 


3328 




HOE 


LOWCASE 




N 


m 


0000.1110 SO 


ASL 


3584 




15 OF 






O 


o 


0000.1111 SI 




3840 




16 10 






R 


P 


0001.0000 DLE 


BPL 


4096 




17 11 


CRSRDN 




Q 


«i 


0001.0001 DCl 


ORA-IY 


4352 




18 12 


RVSON 




R 


i~ 


0001.0010 DC2 




4608 




19 13 


HOME 




S 


s> 


0001.0011 DC3 




4864 




20 14 


DEL 




T 


t 


0001.0100 DC4 




5120 




21 15 






U 


•Jl 


0001.0101 NAK 


ORA-ZX 


5376 




22 16 






V 


v 


0001.0110 SYN 


ASL-ZX 


5632 




23 17 






M 


u 


0001.0111 ETB 




5888 




24 18 






X 


X 


0001.1000 CAN 


CLC 


6144 




25 19 






V 


^ 


0001.1001 EM 


ORA-Y 


6400 




26 lA 


REPEAT 




"Z 


z 


0001.1010 SUB 




6656 




27 IB 


DOTADDR 




c 


C 


0001.1011 ESC 




6912 




28 IC 


RED 




£ 


£ 


0001.1100 FS 




7168 




29 ID 


CRSRRT 




3 


3 


0001.1101 GS 


ORA-X 


7424 




30 IE 


CRN 




•r 


T 


0001.1110 RS 


ASL-X 


7680 




31 IF 


BLU 




•*- 


■e- 


0001.1111 US 




7936 




32 20 


SPACE 




SPACE 


0010.0000 SPACE JSR 


8192 




33 21 


1 


1 


! 


! 


0010.0001 ! 


AND-IX 


8448 




34 22 


QUaiES 




QUOTES 


0010.0010 


QUOTES 


8704 




35 23 


# 


# 


<lt> 


« 


0010.0011 # 




8960 




36 24 


« 


^ 


« 


« 


0010.0100 $ 


BITZ 


9216 




37 25 


Vi 


K 


K 


K 


0010.0101 % 


ANDZ 


9472 


' 1 


38 26 


& 


& 


& 


& 


0010.0110 & 


ROLZ 


9728 


U^ 


39 27 


^ 


^ 


•^ 


rf^ 


0010.0111 ' 




9984 




40 28 


< 


< 


< 


C 


0010.1000 ( 


PLP 


10240 




4129 


> 


> 


> 


5 


0010.1001 ) 


AND-IM 10496 


1 


42 2A 


9t( 


W 


« 


« 


0010.1010 • 


ROL-A 


10752 


i_i 


43 2B 


-»- 


-f- 


-•- 


•+■ 


0010.1011 + 




11008 




44 2C 


* 


* 


* 


^ 


0010.1100 , 


BIT 


11264 




45 2D 


— 


— 


— 


— 


0010.1101 - 


AND 


11520 




46 2E 


_ 


m 


m 


■ 


0010.1110 . 


ROL 


11776 




47 2F 


^ 


^ 


^ 


^ 


0010.1111 / 




12032 




48 30 














0011.0000 


BMI 


12288 




49 31 


1 


1 


1 


1 


0011.0001 1 


AND-IY 12544 




50 32 


2 


2 


2 


2 


0011.0010 2 




12800 


U 


5133 


3 


3 


3 


3 


0011.0011 3 




13056 
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CHR$ BASIC Screen 


POKE 


Trae 


6502 


MSB 


Dec Hex 


Setl 


Set2 Token Setl 


Sel2 


Binary ASCII 


Opcode 


Addr 


52 34 


-* 


4 


4 


-* 


0011.0100 4 




13312 


53 35 


s 


S 


H 


S 


0011.0101 5 


AND-ZX 13568 


54 36 


€ 


£ 


€ 


6 


0011.0110 6 


ROL-ZX 13824 


55 37 


^^ 


■7 


7" 


f 


0011.0111 7 




14080 


56 38 


8 


S 


e 


© 


0011.1000 8 


SEC 


14336 


57 39 


9 


9 


9 


9 


0011.1001 9 


AND-Y 


14592 


58 3A 




■ 


• 


: 


0011.1010 : 




14848 


59 3B 


i 


J 


i 


• 


0011.1011 ; 




15104 


60 3C 


■c 


< 


< 


< 


0011.1100 < 




15360 


61 3D 








sa 


0011.1101 = 


AND-X 


15616 


62 3E 


> 


> 


> 


> 


0011.1110 > 


ROL-X 


15872 


63 3F 


? 


? 


? 


? 


0011.1111 ? 




16128 


64 40 


or 


Q 


_ 


__ 


0100.0000 @ 


RTI 


16384 


65 41 


R 


3. 


* 


R 


0100.0001 A 


EOR-IX 


16640 


66 42 


B 


fc> 


1 


B 


0100.0010 B 




16896 


67 43 


c 


C= 


— 


C 


0100.0011 c 




17152 


68 44 


Q 


cl 


•"" 


B 


0100.0100 D 




17408 


69 45 


e: 


e- 


*■" 


E 


10100.0101 E 


EOR-Z 


17664 


70 46 


F- 


■r 


— 


R 


0100.0110 F 


LSR-Z 


17920 


7147 


C3 


€i 


1 


O 


0100.0111 G 




18176 


72 48 


H 


Fi 


1 


H 


0100.1000 H 


PHA 


18432 


73 49 


I 


i 


•s 


I 


0100.1001 I 


EOR-IM 18688 


74 4A 


J- 


J 


% 


J 


0100.1010 J 


LSR-A 


18944 


75 4B 


K 


k: 


-* 


K 


0100.1011 K 




19200 


76 4C 


l_ 


I 


L_ 


L. 


0100.1100 L 


JMP 


19456 


77 4D 


M 


m 


N> 


M 


0100.1101 M 


EOR 


19712 


78 4E 


M 


r» 


^ 


N 


0100.1110 N 


LSR 


19968 


79 4F 


O 


lO 


r- 


O 


0100.1111 O 




20224 


80 50 


R 


P 


—I 


R 


0101.0000 P 


BVC 


20480 


8151 


a 


<1 


^ 


d 


0101.0001 Q 


EOR-IY 


20736 


82 52 


R 


t~ 


..^ 


R 


0101.0010 R 




20992 


83 53 


s 


s. 


4» 


S 


0101.0011 s 




21248 


84 54 


T 


t 


1 


T 


0101.0100 T 




21504 


85 55 


U 


LL 


*' 


U 


0101.0101 u 


EOR-ZX 21760 


86 56 


V 


V 


X 


V 


0101.0110 V 


LSR-ZX 


22016 


87 57 


M 


Ul 


o 


M 


0101.0111 w 




22272 


88 58 


X 


>C 


1» 


X 


0101.1000 X 


CLI 


22528 


89 59 


V 


!:l 


1 


V 


0101.1001 Y 


EOR-Y 


22784 


90 5A 


z 


3E 


« 


z 


0101.1010 z 




23040 


91 5B 


i: 


C 


-+■ 


-+• 


0101.1011 [ 




23296 


92 5C 


£ 


£ 


a 


a 


0101.1100\ 




23552 


93 5D 


3 


3 


1 


1 - 


0101.1101 ] 


EOR-X 


23808 


94 5E 


■r 


•r 


IT 


K 


0101.1110 It 


LSR-X 


24064 


95 5F 


*- 


■*- 


"^ 


S9 


0101.1111 ^ 




24320 


96 60 


— 


— 


SPACE 


0110.0000 SPACE RTS 


24576 


97 61 


«• 


HI 


■ 


■ 


0110.0001 a 


ADC-IX 


24832 


98 62 


1 


B 


■■ ' 


■■ 


0110.0010 b 




25088 


99 63 


— 


C 


"■■" 


^"~ 


0110.0011 c 




25344 


100 64 


*■■ 


33 


^^ 


..M. 


0110.0100 d 




25600 


10165 


■"■" 


E 


1 


1 


0110.0101 e 


ADC-Z 


25856 


102 66 


— 


F 


S8 


» 


0110.0110 f 


ROR-Z 


26112 


103 67 


1 


C3 


1 


1 


0110.0111 g 




26368 


104 68 


1 


H 


MM 


AM 


0110.1000 h 


PLA 


26624 


105 69 


-s 


X 


^ 


93 


0110.1001 i 


ADC-IM 26880 


106 6A 


s. 


or 


1 


1 


0110.1010 j 


ROR-A 


27136 


107 63 


-* 


K 


h 


h 


0110.1011 k 




27392 


108 6C 


l_ 


L. 


■ 


■ 


0110.1100 1 


JMP-I 


27648 



n 
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CHR$ 


BASIC 


Screen 


POKE 


True 


6502 


MSB 


Dec Hex 


Sell 


Sel2 


Token 


Setl 


Sel2 


Binary ASCII 


Opcode 


Addr 


109 6D 


■*«>. 


M 




b 


1. 


0110.1101 m 


ADC 


27904 


110 6E 


^ 


M 




-» 


-1 


0110.1110 n 


ROR 


28160 


1116F 


v 


a 




— 


— 


0110.1111 o 




28416 


112 70 


— 1 


R 




f- 


r 


0111.0000 p 


BVS 


28672 


113 71 


4K 


a 




.J. 


_b 


0111.0001 q 


ADC-IY 


28928 


114 72 


__ 


R 




—r 


-r* 


0111.0010 r 




29184 


115 73 


4» 


s 




-1 


-1 


0111.0011 s 




29440 


116 74 


1 


T 




i 


1 


0111.0100 t 




29696 


117 75 


*» 


U 




1 


1 


0111.0101 u 


ADC-ZX 29952 


118 76 


X 


V 




_■ 


_■ 


0111.0110 V 


ROR-ZX 30208 


119 77 


o 


IaJ 








0111.0111 w 




30464 


120 78 


f* 


X 




^*" 


^^ 


0111.1000 X 


SEI 


30720 


121 79 




V 




^m 


KB 


0111.1001 y 


ADC-Y 


30976 


122 7A 


■» 


z 




_J 


f' 


0111.1010 z 




31232 


123 7B 


■+ 


-1- 




■ 


■ 


0111.1011 { 




31488 


124 7C 


s 


s 




■ 


*" 


0111.1100 1 




31744 


125 7D 


1 


1 




-J 


^ 


0111.1101 } 


ADC-X 


32000 


126 7E 


•rr 


K 




" 


" 


0111.1110 " 


ROR-X 


32256 


127 7F 




SS 




■^ 


■W 


0111.1111 DEL 




32512 


128 80 






END 


vx 


ISI 


1000.0000 




32768 


129 81 






FOR 


-SI 


El 


1000.0001 


STA-IX 


33024 


130 82 






NEXT 


isa 


sa 


1000.0010 




33280 


13183 


LOAD/RUN 


DATA 


M 


n 


1000.0011 




33536 


132 84 






INPUT# 


in 


91 


1000.0100 


STY-Z 


33792 


133 85 


fl 




INPUT 


s4 


9 


1000.0101 


STA-Z 


34048 


134 86 


f3 




DIM 


sal 


IM 


1000.0110 


STX-Z 


34304 


135 87 


e 




READ 


M 


BI 


1000.0111 




34560 


136 88 


f7 




LET 


SI 


sn 


1000.1000 


DEY 


34816 


137 89 


f2 




GOTO 


■ • 


n 


1000.1001 




35072 


138 8A 


f4 




RUN 


M 


n 


1000.1010 


TXA 


35328 


139 8B 


f6 




IF 


Bi 


51 


1000.1011 




35584 


140 8C 


ffi 




RE- 


















STORE 


■1 


IB 


1000.1100 


STY 


35840 


141 8D 


SHRTRN 


GOSUB 


BI 


TSl 


1000.1101 


STA 


36096 


142 8E 


UPCASE 


RETURN 


BI 


nn 


1000.1110 


STX 


36352 


143 8F 






REM 


M 


SI 


1000.1111 




36608 


144 90 


BLK 




STOP 


Sfl 


sB 


1001.0000 


BCC 


36864 


145 91 


CRSRUP 


ON 


»l 


Efl 


1001.0001 


STA-IY 


37120 


146 92 


RVSOFF 


WATT 


a 


S 


1001.0010 




37376 


147 93 


CLR 




LOAD 


sa 


BI 


1001.0011 




37632 


148 94 


DMST 




SAVE 


IB 


M 


1001.0100 


STY-ZX 


37888 


149 95 






VERIFY 


JU 


39 


1001.0101 


STA-ZX 


38144 


150 96 






DEF 


M 


a 


1001.0110 


STX-ZY 


38400 


15197 






POKE 


BI 


n 


1001.0111 




38656 


152 98 






PRINT# 


«l 


ai 


1001.1000 


TYA 


38912 


153 99 






PREvJT 


fli 


a 


1001.1001 


STA-Y 


39168 


154 9A 






CONT 


al 


la 


1001.1010 


TXS 


39424 


155 9B 






LIST 


IN 


IN 


1001.1011 




39680 


156 9C 


PUR 




CLR 


na 


rai 


1001.1100 




39936 


157 9D 


CRSRLFT 


CMD 


M 


Ml 


1001.1101 


STA-X 


40192 


158 9E 


YEL 




SYS 


BI 


■1 


1001.1110 




40448 


159 9F 


CYN 




OPEN 


B 


B 


1001.1111 




40704 


160 AO 


SHSPACE 


CLOSE 


H 


B 


1010.0000 


LDY-IM 


40960 


161 Al 


■ 


■ 


GET 


U 


U 


1010.0001 


LDA-IX 


41216 


162 A2 


^ 


g^ 


NEW 


siniiM 


1010.0010 


LDX-IM 41472 


163 A3 


^^ 


^^ 


TAB( 


ill 


ill 


1010.0011 




41728 
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Dec Hex 


Setl 


Set2 


164 A4 





^^^ 


165 A5 


1 


1 


166 A6 


m 


m 


167 A7 


1 


1 


168 A8 


«M 


MM 


169 A9 


^ 


^ 


170 AA 


1 


1 


171 AB 


h 


1- 


172 AC 


■ 


■ 


173 AD 


b 


1. 


174 AE 


-1 


1 


175 AF 


— 


— 


176 BO 


r 


r- 


177 Bl 


.JL. 


■JU 


178 B2 


T 


-I- 


179 B3 


H 


H 


180 B4 


1 


1 


181 B5 


I 


1 


182 B6 


1 


I 


183 B7 


*"" 


^~ 


184 B8 


^" 


"" 


185 B9 


^ 


^ 


186 BA 


_J 


•^ 


187 BB 


■ 


a 


188 BC 


" 


■ 


189 BD 


-t 


-J 


190 BE 


" 


■• 


191 BF 


■^" 


"W 


192 CO 


B- 


s- 


193 CI 


sa 


"Sl 


194 C2 


■■ 


la 


195 C3 


B 


M 


196 C4 


B 


in 


197 C5 


^ 


al 


198 C6 


Hi 


al 


199 C7 


IB 


H 


200 C8 


■1 


SI 


201 C9 


SI 


■a 


202 CA 


■B 


u 


203 CB 


Bl 


Si 


204 CC 


■ 


K 


205 CD 


BP 


Bl 


206 CE 


BB 


Bl 


207 CF 


■ 


M 


208 DO 


B 


di 


209 Dl 


n 


» 


210 D2 


— 


a 


211 D3 


r3 


sa 


212 D4 


IB 


■■ 


213 D5 


IB 


JU 


214 D6 


s 


Ai 


215 D7 


so 


Bl 


216 D8 


sa 


41 


217 D9 


■1 


fli 


218 DA 


ra 


m 


219 DB 


s: 


ss 



BASIC 


Screen POKE 


True 


6502 MSB 


Token 


Setl Set2 


Binary ASCII 


Opcode Addr 


TO 


31 


IB 


1010.0100 


LDY-Z 41984 


FN 


«l 


*t 


1010.0101 


LDA-Z 42240 


SPC( 


sa 


sa 


1010.0110 


LDX-Z 42496 


THEN 


Bi 


m 


1010.0111 


42752 


NOT 


Dl 


H 


1010.1000 


TAY 43008 


STEP 


a 


n 


1010.1001 


LDA-IM 43264 


+ 


sa 


ta 


1010.1010 


TAX 43520 


- 


Ea 


a 


loio.ion 


43776 


* 


m 


m 


1010.1100 


LDY 44032 


/ 


Bl 


s 


1010.1101 


LDA 44288 


It 


M 


IB 


1010.1110 


LDX 44544 


AND 


w 


Bl 


1010.1111 


44800 


OR 


3SI 


3ai 


1011.0000 


BCS 45056 


> 


fl 


fB 


1011.0001 


LDA-IY 45312 


= 


ea 


«4 


1011.0010 


45568 


< 


H 


M 


1011.0011 


45824 


SGN 


SI 


SI 


1011.0100 


LDY-ZX 46080 


INT 


981 


Al 


1011.0101 


LDA-ZX 46336 


ABS 


sa 


SI 


1011.0110 


LDX-ZY 46592 


USR 


M 


IM 


1011.0111 


46848 


FRE 


3=a 


» 


1011.1000 


CLV 47104 


POS 


ea 


aa 


1011.1001 


LDA-Y 47360 


SQR 


Hi 




1011.1010 


TSX 47616 


RND 


H 


HI 


1011.1011 


47872 


LOG 


Bl 


sm 


1011.1100 


LDY-X 48128 


EXP 


a 


a 


1011.1101 


LDA-X 48384 


COS 






1011.1110 


LDX-Y 48640 


SIN 


H 


H 


1011.1111 


48896 


TAN 


Bi 


a: 


1100.0000 


CPY-IM 49152 


ATN 


;a 


w 


1100.0001 


CMP-IX 49408 


PEEK 


IB 


i:a 


1100.0010 


49664 


LEN 


B 


M 


1100.0011 


49920 


STR$ 


B 


la 


1100.0100 


CPY-Z 50176 


VAL 


■1 


ai 


1100.0101 


CMP-Z 50432 


ASC 


— 


a 


1100.0110 


DEC-Z 50688 


CHR$ 


IB 


H 


1100.0111 


50944 


LEFr$ 


Bl 


SI 


1100.1000 


INY 51200 


RIGHTS 


91 


IB 


1100.1001 


CMP-IM 51456 


MID$ 




M 


1100.1010 


DEX 51712 


GO 


ai 


SI 


1100.1011 


51968 




■i 


■1 


1100.1100 


CPY 52224 






Bl 


1100.1101 


CMP 52480 




wa 


Bl 


1100.1110 


DEC 52736 






M 


1100.1111 


52992 




a 


a 


1101.0000 


BNE 53248 




n 


M 


1101.0001 


CMP-nC 53504 




s 


SI 


1101.0010 


53760 




ra 


» 


1101.0011 


54016 




IB 


IB 


1101.0100 


54272 




■B 


JU 


1101.0101 


CMP-ZX 54528 




89 


« 


1101.0110 


DEC-ZX 54784 




SO 


Bl 


1101.0111 


55040 




sa 


<BI 


1101.1000 


CLD 55296 




Bl 


Al 


1101.1001 


CMP-Y 55552 




ra 


cal 


1101.1010 


55808 




ss 


SS 


1101.1011 


56064 



n 
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CHR$ 


BASIC Screen 


POKE 


True 


6502 


MSB 


Dec Hex 


Setl 


Set2 


Token Setl 


SetZ 


Binary ASCn 


Opcode 


; Addr 


220 DC 


m 


m 


» 


» 


1101.1100 




56320 


221 DD 


■1 


■1 


■ I 


■ 1 


1101.1101 


CMP-X 


56576 


222 DE 


n 


■Q- 


na 


•C- 


1101.1110 


DEC-X 


56832 


223 DF 


hh. 


sa 


^ 


SH 


1101.1111 




57088 


224 EO 


■■ 


H 


■1 


■1 


1110.0000 


CPX-IM 57344 


225 El 


■ 


■ 


B 


B 


1110.0001 


SBC-IX 


57600 


226 E2 


^ 


^ 


■^ 


■■■ 


1110.0010 




57856 


227 E3 


■■ 


■1 


IM 


■i 


1110.0011 




58112 


228 E4 


■i 


■i 


■■ 


■■ 


1110.0100 


CPX-Z 


58368 


229 E5 


■ 


■ 


n 


B 


1110.0101 


SBC-Z 


58624 


230 E6 


m 


ss 


&i 


^ 


1110.0110 


INC-Z 


58880 


231 E7 


■ 


■ 


B 


■ 


1110.0111 




59136 


232 E8 


SB 


9S 


SS 


SS 


1110.1000 


INX 


59392 


233 E9 


^ 


38! 




iSS 


1110.1001 


SBC-IM 


59648 


234 EA 


■1 


■ 


H 


■ 


1110.1010 


NOP 


59904 


235 EB 


■: 


■a 


■: 


BS 


1110.1011 




60160 


236 EC 


^ 


^ 


r- 


^ 


1110.1100 


CPX 


60416 


237 ED 


■£ 


us 


Bfi 


SI 


1110.1101 


SBC 


60672 


238 EE 


n 


SI 


SI 


SI 


1110.1110 


INC 


60928 


239 EF 


■■ 


" 


" 


■■ 


1110.1111 




61184 


240 FO 


R 


WfS 


IRi 


^m 


1111.0000 


BEQ 


61440 


241 Fl 


ss 


ss 


^^ 


£5 


1111.0001 


SBC-IY 


61696 


242 F2 


St 


s: 


n 


55 


1111.0010 




61952 


243 F3 


SI 


SI 


SI 


SI 


iiii.oon 




62208 


244 F4 


■ 


■ 


■ 


■1 


1111.0100 




62464 


245 F5 


■ 


■ 


■ 


■ 


1111.0101 


SBC-ZX 


62720 


246 F6 


■ 


■ 


■ 


■ 


1111.0110 


INC-ZX 


62976 


247 F7 


■■ 


■■ 


ggi 


Ml 


1111.0111 




63232 


248 F8 


■■ 


■■ 


■■ 


■i 


1111.1000 


BED 


63488 


249 F9 


■■ 


^ 


■■ 


■■ 


1111.1001 


SBC-Y 


63744 


250 FA 


■ 


•s 


■1 


■g 


1111.1010 




64000 


251 FB 


Tl 


•^ 


^ 




1111.1011 




64256 


252 FC 


■■ 


Um 


■b 


1^ 


1111.1100 




64512 


253 FD 


SI 


SI 


SI 


SI 


1111.1101 


SBC-X 


64768 


254 FE 


■■ 


iJi 


^ 


hB 


1111.1110 


INC-X 


65024 


255 FF 


m 


-9- 


^ 


rf" 


1111.1111 




65280 



u 
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This appendix summarizes the information in the body of the map 
regarding device numbering, secondary address considerations, and 
status codes returned by the Kemal when it performs I/O and re- 
lated information. 

Within the following chart are note indicators denoted by [n], 
where n is the number of the note in the section following the chart. 
Following the chart are examples illustrating the use of device num- 
bers and secondary addresses. After the example section is a sum- 
mary of the memory locations related to this subject. 

Table D— 1. Device Number, Secondary Address, and 
Status Code 



Number = Device 


SecAddr 


Meaning ST Meaning 







KEYBOARD 


[1] 


[1] [2] 






TAPE 


0/1 


READ 4 Short block 






TAPE 


0/1 


READ 8 Long block 






TAPE 


0/1 


READ 16 Unrecoverable error or 
VERIFY mismatch 






TAPE 


0/1 


READ 32 Checksum error 






TAPE 


0/1 


READ 64 End of file 






TAPE 


0/1 


READ -128 EOT [3] 






TAPE 


1 


WRITE [2] 






TAPE 


2 


WRITE -H EOT 
3 [2] 




2 


4] RS-232 


1 


5 128 BREAK detected 




2 


4 RS-232 


1 


5 64 Dataset-ready missing 




2 


4 RS-232 


1 


5 16 Clear- to-send missing [6] 




2 


4 RS-232 


1 


5 4 Receive buffer overrun 




2 


4 RS-232 


1 


5 2 Framing error 




2 


4 RS-232 


1 


5 1 Parity error 


3 


SCREEN 


1 


1 [2] 




4/5 


PRINTER 





UPPERCASE 1 Write timeout 




4/5 


PRINTER 





UPPERCASE -128 Device not present 


J 


4/5 


PRINTER 


7 


LOWERCASE 1 Write timeout 


4/5 


PRINTER 


7 


LOWERCASE -128 Device not present 




8-11 


I DISK 





LOAD [7] 




8-11 


I DISK 





LOAD 2 Read ttmeout 


r~ 


8-11 


I DISK 





LOAD -128 Device not present 


i 


8-1] 


L DISK 


1 


SAVE [7] 




8-11 


L DISK 


1 


SAVE 1 Write timeout 




8-1] 
320 


L DISK 
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SAVE -128 Device not present 
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Number 


= Device 


SecAddr 


Meaning 


ST Meaning 


8-11 


DISK 


2-14 


DATA 
CHANNEL 


[7] 


8-11 


DISK 


2-14 


DATA 
CHANNEL 


1 Write timeout 


8-11 


DISK 


2-14 


DATA 
CHANNEL 


64 Read timeout 


8-11 


DISK 


2-14 


DATA 
CHANNEL 


64 Er»d of input (last item) 


8-11 


DISK 


2-14 


DATA 
CHANNEL 


-128 Device not present 


8-11 


DISK 


15 


DOS CHAN 

NEL 


[7] 


8-11 


DISK 


15 


DOS CHAN 
NEL 


1 Write timeout 


8-11 


DISK 


15 


DOS CHAN 
NEL 


2 Read timeout 


8-11 


DISK 


15 


DOS CHAN 
NEL 


-128 Device not present 


4-30 


SERIAL 










DEVICE 


0-31 


Per device 


1 Write timeout 


4-30 


SERIAL 










DEVICE 


0-31 


Per device 


2 Read timeout 


4-30 


SERIAL 










DEVICE 


0-31 


Per device 


64 End of input (last item) 


4-30 


SERIAL 










DEVICE 


0-31 


Per device 


-128 Device not present 



■u. 
U 



Notes 

Tape secondary addresses are not used in exactly the same way 
throughout the VIC-20. In an OPEN statement, a indicates READ, 
a 1 specifies WRITE, and a 2 means WRITE with EOT. When 
SAVEing or the Kernal's SETLFS routine is called in preparation for 
a SAVE routine call, an odd-numbered secondary address causes the 
tape header I.D. to be set to indicate that the program file cannot be 
relocated. An even-numbered secondary address causes the program 
file to be relocatable. Adding 2 to the secondary address causes a 
tape EOT header to also be written. 

For LOAD, or the SETLFS routine prior to calling the LOAD 
routine, an odd secondary address causes the header information 
(the start of save pointer) to be used to reload the program. For an 
even-numbered secondary address, an address must be provided that 
specifies the desired load point. However, even if an even number is 
passed to SETLFS to indicate a relocatable load and an address is 
provided for the starting point, if the program was saved as 
nonrelocatable (via a secondary address that was odd at the time of 
saving, causing a tape header I.D. 3), it will be loaded back to the 
original location it resided at when it was saved. See location 828 
($33C) in the memory map for more information about tape header 
identifiers. 
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1 The secondary address has no meaning for this device and 0-255 

can be used. In the case of devices and 3, the parameter can sim- , , 

ply be omitted on the OPEN statement. Omitting the parameter or | \ 

spedf)dng for other devices inhibits the sending of any following 

string. User port attached devices can themselves require certain 

secondary addresses. Howrever, the VIC Modem does not. | \ 

2 No status codes are returned. 

3 EOT is a tape header with an I.D. of 5 used to indicate that no 
more files exist on the tape. For additional details, refer to the 
explanation at location 828 ($33C). 

4 The user port is typically used for RS-232 protocol devices, such as 
modems and printers, but can be used for a variety of other devices 
as well. For instance, joysticks, remote electrical switching devices, 
and analog sensors may be connected. You can program the first 
VIA in the VIC-20 to accomplish a wide range of device support 
functions. 

5 User port functions, including data direction, are controlled by 
VIAl. RS-232 protocol on the user port is determined by the Kemal 
RS-232 routines and OPEN settings of the RS-232 control register 
(described at location 659, $293) and the RS-232 command register 
(described at location 660, $294). 

6 This status code will never be set. See the explanation at location 
660 ($294). General RS-232 error recovery suggestions are discussed 
at location 663 ($297). 

7 The DOS channel (secondary address of 15) is used to send com- 
mands to the disk resident DOS and to receive error status. Four 
variables are returned by the DOS channel in response to an 
INPUT#15,A,B$,C,D. These are: error number (0 means none), error 
description, track number, and block (sector) number. Consult the 
VIC-1541 User's Manual for details of sending commands to DOS, 
receiving the error status variables, and a table of the possible error 
numbers. 

Examples U 

Ten files may be opened at any one time, only five of them 

being serial (disk/printer) files. File numbers greater than 127 cause | — , 

a linefeed character to be sent after carriage returns. This feature is M 
designed for non-CBM printers. 

The OPEN command parameters are: i — | 

OPEN file number,device number,secondary address, "filename or 

disk command" 

• OPEN 16 causes the default device of 1 and secondary address of f"! 
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to be used. The tape will be opened for a read operation. File 
number is the only mandatory OPEN parameter. 

• OPEN 1,0 prepares the keyboard for input. An attempt to 
PRINT* 1 will receive a NOT OUTPUT FILE error message. 

• OPEN 1,1 opens the next found tape file for input since the 
secondary address defaults to zero. 

• OPEN 1,1,0,"FAST GAME" searches the tape for the specified 
filename. Notice that the secondary address was needed in order to 
specify the filename. OPEN 1,1„"FAST GAME" could have been 
used as well. 

• OPEN 1,1,1,"ACC0UNTS" causes the creation of a tape header 
with I.D. 4, indicating that BASIC program or ML generated data is 
being written to tape. See the explanation of the tape header I.D. at 
location 828 ($330). 

• OPEN l,l,2,"HOME INVENTORY" also creates the same type of 
tape header. Additionally, when the file is closed, an I.D. 5 header 
will be written, indicating that there are no more files on the tape, 
whether there actually are or not. 

• OPEN 2,2,0,CHR$(6+32)+CHR$(32+16) sets the RS-232 control 
options to 300 baud and a word length of seven bits, while the RS- 
232 command options are being set to odd parity and half duplex. 

• OPEN 3,3 allows the screen to be used for input or output 
operations. 

• OPEN 4,4 opens the printer in uppercase mode, since the default 
secondary address is zero. 

• OPEN 10,8,12,"0:STOCK ISSUES,S,W" prepares the disk (the 
zero and colon are optional on the VIC 1540 and 1541) to write by 
virtue of the ,W parameter, a sequential file (specified by the ,S,) 
using data channel 12, referred to as file 10 within the program. It 
may be convenient to use the same file number as the data channel 
number in order to avoid confusion. Besides ,S, for file type, you can 
specify ,P, for program and ,11, for user files. The ,W parameter 
would be ,R when reading the file. Consult the VIC-1541 User's Man- 

'•- i ual for additional details. 

• OPEN 15,8,15,"V" requests that the DOS channel be used to send 
the V command (VALIDATE) to DOS for processing. The disk direc- 

1 I tory will be reorganized by DOS in response to this command. 

Related Memory Locations 

\ ! The following memory locations provide additional information on 

'— ' the subject of device numbers, secondary addresses, and status 

codes. 

^ ! 19 ($13) Current channel number for BASIC input/ 

^^ output routines 
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ST status register 

Number of currently open files , 

Device number of the current input file | I 

Device number of the current output file 

Number of characters in the filename 

Current logical file number | I 

Current secondary address being used 

Current device number being used 

Pointer to the current filename 

Open file number table 

Open device number table 

Open secondary address table 

RS-232 ST status register 



144 


($90) 


152 


($98) 


153-154 


($99-9A) 


154 


($9A) 


183 


($B7) 


184 


($B8) 


185 


($B9) 


186 


($BA) 


187-188 


($BB-BC) 


601-610 


($259-262) 


611-620 


($263-26C) 


621-630 


($26D-276) 


663 


($297) 



n 
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Automatic and User 
Relocation of Memory 
Contents 

Three important aspects of the relocation of VIC-20 memory con- 
tents are explored in this appendix: the relocations performed auto- 
matically by the Kemal when the VIC-20 is powered-on (or 
reset) with expansion memory plugged in, methods for programs to 
test and adjust to the standard memory expansion configurations, 
and considerations when relocating the memory areas to suit your 
program's needs. 

Automatic Relocation by the Kernal 

When the VIC-20 is turned on (or a reset switch is pressed on a 
memory expansion board), the Kemal measures the amount of RAM 
available and places the BASIC program area, screen map, and color 
at positions in memory that allow the largest continuous block of 
memory for the BASIC program area, consistent with restiictions 
imposed by the addressing scheme used in the 6560 VIC chip. The 
following table summarizes the major locations affected when add- 
ing memory expansion. 



Table E-1. Effect of Adding Memory Expansion to 
tbeVIC 



Expansion 
Added 

OK 

3K 

8K 

8K+3K 
16K 

16K-I-3K 
24K 

24K-I-3K 
32K 
32K-I-3K 



Total 
RAM 

5K 

8K 
13K 
16K 
21K 
24K 
29K 
32K 
37K 
40K 



Bytes 
Free 

35B3 
6655 
11775 
11775 
19967 
19967 
28159 
28159 
28159 
28159 



Color 

Map 

38400 

38400 

37888 

37888 

37888 

37888 

37888 

37888 

37888 

37888 



Screen 
Map 

7680 
7680 
4096 
4096 
4096 
4096 
4096 
4096 
4096 
4096 



BASIC 

Start 

4097 

1025 

4609 

4609 

4609 

4609 

4609 

4609 

4609 

4609 



BASIC 
End 

7680 
7680 
16384 
16384 
24576 
24576 
32768 
32768 
32768 
32768 



The BASIC start pointer is located at 43-44 ($2B-2C) and the 
BASIC end pointer is at location 55-56 ($37-38). The Kemal pointer 
at 641-642 ($281-282) (bottom of RAM) is normally pointing one 
byte before the BASIC start pointer. The Kemal pointer at 643-644 
($283-284) is normally pointing at the same location as the BASIC 
end pointer. Appendix B discusses the pointers used by BASIC to 
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manage the various variable pools. If a Super Expander cartridge is 

used in place of a normal 3K expansion memory board, subtract 135 _ 

bytes from the Bytes Free column and from the BASIC End column. !j 

(The term K means 1024 bytes. Expansion memory is usually 

added in increments of 8K or 16K, except for a single 3K expansion.) 

The effects of memory expansion can be summarized as: ] j 

• 3K expansion doesn't cause relocation of any areas except the start 
of the BASIC program. 

• Adding 8K or more expansion causes the BASIC pro-am area, ti^e 
screen map, and the color map to be relocated, but adding additional 
expansion does not cause further relocation schemes! 

• Once 8K or more ©cpansion is added, BASIC won't see or use any. 
3K expansion. 

• Adding expansion memory above 24K (to either the 8K area at 
40960 ($A000) and/or to the 3K expansion area) does not iftcrease 
the amount of RAM available to store a BASIC program. RAM areas 
that BASIC cannot use for program storage can be used to store user 
data (with POKEs) or to contain machine language instructions. 

Finding tiie Relocatable Areas 

When writing a program, you can include instructions that determine 
the memory size and adjust the program to operate correctly when 
additional memory expansion is plugged in. If this were done by all 
program authors, the warning Runs only on an unexpanded VIC could 
be eliminated. The following line determines the memory expansion 
environment and sets the variables SM to the screen map location 
and CM to the location of the color map. Since the screen map loca- 
tion affects the value to be POKEd into location 36869 to cause a 
svdtch between the two possible character sets, PRINT CHR$(14) 
should be used to switch to the lowercase set and PRINT CHR$(142) 
to iswitch back to uppercase. 

SM=7680:CM=38400:IF PEEK(648)=16 THEN SM=4096:CM=37888 

The instructions set the default values for an unexpanded VIC, 
then test the screen memory page number that was set by the Kemal jJ 

at power-on/reset. Location 641-642 ($281-282) in the memory 
map includes a routine that can be used to unexpand the VIC, mak- 
ing it temporarily forget any memory expansion that is plugged in. T / 
Instructions for reexpanding the memory are also included. '—> 

The screen memory starting location ciin also be determined by 
SM=PEEK(648)*256 and the color map can be found with p . 

CM=37888+4*(PEEK(36866)AND 128). U 

u 
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Relocation by the User 

The subject of user relocation of the BASIC area, the screen map, 
custom character sets, and the color map has three major consid- 
erations which must be resolved before starting any relocation. First, 
how much expansion memory will be on the VIC? Second, remem- 
ber that expansion memory is not addressable by the 6560 VIC chip 
and cannot be used for screen, color, or character memory (but is 
available for a BASIC program area), and that the VIC chip imposes 
restrictions on the starting address for the screen and character maps. 
Also, decide which areas need to be relocated in order to achieve the 
objectives of your program. 

The third issue is not as straightforward as you might assume. 
Since nonexpansion RAM is only 4096 bytes in length (locations 
4096 through 8191) and because that area is normally either the 
BASIC program area or a part of the BASIC area, plus the screen 
map (on an 8K-I- expanded VIC-20), the relocation of one area to 
nonexpansion RAM may necessitate relocating the BASIC area and 
perhaps choosing a more limited custom character set than you 
would have preferred. It is also possible to expand or contract the 
amount of space required for the screen map. Contraction is often 
chosen on an unexpanded VIC-20. 

A further complication is the demand by the VIC chip that 
screen and character maps begin on certain address boundaries. A 
table of possibilities is included in this appendix to help you deter- 
mine the possible and desirable combinations. Before you begin any 
program that depends on relocated areas, you should take the time 
to consider these issues and sketch out the relocated memory 
configuration that you'll be working with. 

Relocating RASIG 

The first relocation of a memory area that you'll probably want to 
perform will involve lowering or raising the boundaries for the BA- 
SIC area. The storage of machine language programs in memory 
along with your BASIC program usually requires this adjustment of 
the BASIC area. Sometimes the tape buffer at 828 ($33C) provides 
some capability for this without adjusting BASIC pointers. In the di- 
rect mode, 

POKE 642,PEEK(642)+NS:POKE 644,PEEK(644)-NL:SYS 58232 

can be used to move the start of the BASIC area up NS pages, the 
end down NL pages, as well as to cold start BASIC, destroying any 
current program. By subtracting NS from 642, you can move the 
start downward. By adding to NL, you make the end point move 
upward. Locations 642 and 644 can also be set to the desired values 
directly, without the PEEK. A program is provided at location 55 
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($37) in the memory map to reserve space m the BASIC area from 
the top or the bottom. 

Moving the BASIC area to an entirely different location is easily 
accomplished with the methods demonstrated in the program. Place 
the new values into the appropriate pointers rather than adding to or 
subtracting from them. At location 641-642 ($281-282) of the mem- 
ory map is a routine that can be used to unexpand the VIC, making 
it temporarily forget any memory expansion that's plugged in. 
Instructions for reexpanding the memory are also included. 

Relocattng Character Seta 

The character sets won't actually be reloGated>; but the goal is to pro- 
vide an alternate set of characters to be used alone or in conjunction 
with the character maps provided in ROM. The number of characters 
in the custom character set will largely determine where you'll place 
it in memory. The wraparound method of addressing which i§ used 
by the yiC chip can aUowj^M to address part of jiie standar#^^ 
cnaracter set as well as yojir ovm eustem character set if you jghoose ; 
the address of your custom chaxaeter set earefuHy. For the urn; 
expanded VIC-2Q, lowering the top-of-BASIC pointer at 55-^56j^$3f *- 
38J by 512 bytes and placing the custom character set there will 
acfiieve the wraparound effect. 

COMPUTEI's First Book of VIC includes an article, "Custom 
Character Sets for the VIC," by David Malmberg, which uses this 
technique for a custom character design aid. Custom character sets 
are needed when you tackle bitmapping of the screen, so it's a good 
place to start your exploration of relocatable memory areas, and it 
allows you to uniquely customize the screen displays of your pro- 
grams. Creating custom characters for the VIC-20 is discussed at 
location 36869, the preamble to 32768, and in Appendix G. 

The character map is used as a pixel map of the character for 
the corresponding screen POKE code. If you never use a screen code 
above value X, the character map will not be referenced above 
(8*X)+7 (or (16*X)+15) and may be used for other things. By start- 
ing the color map at 6144, for example, you could define up to 256 
characters between 6144 and 8191. See location 36869 for details of 
how to set the pointer to the character map and the subject of wrap- 
around, allowing access to the ROM maps as well as RAM character 
sets. 

Table E-2 shows the possible character map locations on the 
VIC, as well as the number of characters that can be placed in each. 
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Table E-2. Ohanctei Maps 

Character 

Map Characters 

4096-5119 1-128 

4096-6143 1-256 

4096-7167 1-384 

4096-8191 1-512 

5120-6143 1-128 

5120-7167 1-256 

5120-8191 1-384 

6144-7167 1-128 

6144-8191 1-256 

7168-8191 1-128 

Relocating the Screen and Goloi Map 

These two areas are considered together because the color map loca- 
tion is dependent upon the screen map location. The primary reason 
for relocating the screen map is to free the area it's residing in for 
custom characters. Additionally, multiple screen maps can be used to 
quickly flip between screens. More than 23 lines of 22 columns can 
even be displayed on the TV screen if there is room in memory to 
expand the screen map. 

The screen map location also determines which color map will 
be used. See location 36869 for additional details of this relationship. 
The VIC chip can be told to display fewer or more than 22 columns 
in 23 lines; the amount of screen RAM needed to display the speci- 
fied lines and columns will depend on these settings of the VIC chip 
registers. If more than 512 bytes are to be displayed, you'll want to 
choose a screen RAM location that causes the color map to begin at 
37888 so that the 38400 color map can be used for the color nybbles 
for the screen bytes beyond 512. 

Table E-3 shows the possible screen map locations on the VIC, 
as well as the corresponding color map locations. 

Table E-3. Sciran Map-Ooloi Map Locations 



Screen Map 


Color Map 


4096-4607 


37888 


4608-5119 


38400 


5120-5631 


37888 


5632-6143 


38400 


6144-6655 


37888 


6656-7167 


38400 


7168-7679 


37888 


7680-8191 


38400 
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Examples of User Relocation of Character and 

Screen Maps — 

In the article "High-Resolution Plotting," written by Paul F. Schatz U 

and included in COMPUTEI's First Book of VIC, the author chose (for 

an unexpanded VIC-20) locations 4096-5631 for BASIC, 5632-6143 — 

for the screen, and 6144-8191 for custom characters. He dem- M 

onstrated a 16-line by 16-column bitmapped screen display. For an 

expanded VIC-20, he chose a 22-column by 20-line display: 4096- 

7615 holds the character map (220 characters, each 8*16 size), 7680- 

8191 is used for the screen map, and BASIC is in expansion mem- 
ory. The Super Expander cartridge also uses this arrangement of 
screen and character memory. 

An alternate arrangement, with different goals in mind, was 
chosen in "Creating Graphics on an Expanded VIC," by Ed Harris, 
in the February 1983 issue of COMPUTE!. The screen map is re- 
located to 4096-4607; a 384-character set, with wraparound, was 
placed at 5120-8191; and BASIC started at 8192 (an 8K-I- 
expansion). 

Table E-4 illustrates some typical locations you could use when 
you relocate the character map, the screen map, and BASIC. 

Table E-4. Typical Relocations 

Unexpanded 

6656 BASIC 
6144 Screen Map 
4096 Character Map 

6144 Character Map 
5632 Screen Map 
4096 BASIC 

Expanded 

8192 BASIC 
7680 Screen Map 
7168 Character Map 

8192 BASIC U 

7168 Character Map 
4096 Screen Map 

8192 BASIC U 

7680 Screen Map 
4096 Character Map 

8192 BASIC U 

5120 Character Map 

4096 Screen Map ■ — 
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Block SAVE /LOAD Using the 
Kernal Routines from BASIC 



This program demonstrates the techniques that can be used to call 
Kernal routines from a BASIC program by passing the required 
parameters in the SYS register SAVE area. It also serves as a model 
to be enhanced or extracted from to suit your particular purposes. As 
currently coded, the program provides block SAVE and LOAD 
capabilities sinular to the LOAD and SAVE BASIC commands or a 
machine language monitor such as VICMON. A block of memory 
may be saved to tape in either a relocatable or nonrelocatable form, 
later to be reloaded with the same program. Variables define the 
filename, the address range to be saved, whether the format of the 
tape is to allow relocation or not, and whether an end-of-tape header 
should be written following the block of data. 

The program could be enhanced in several ways. It could be 
changed to perform verification on the saved data, support the disk, 
supply prompts for the user, or to display instructions for the cre- 
ation of an external tape label with the filename, address range, and 
relocatability indicator. 

You could also extract part of this program to use as short 
routines in your own programs. The 25-line SAVE routine can easily 
be compressed to a five- or six-line subroutine, for example. 

The subject of relocatable saved blocks may need more clarifica- 
tion. If RELO$=NO is specified for the save operation, the data 
saved in a program type file format can't be relocated during a sub- 
sequent LOAD, even if RELO$=YES is requested during the load 
operation. If RELO$=YES is specified when saved, the later LOAD 
may request either YES or NO. When RELO$=YES is coded during 
a LOAD, the FROM= variable tells the LOAD routine the starting 
address of where the data should be loaded. The LAST= variable 
I j has no meaning during a load operation. 

Program F-l. Block SAVE/LOAD 

I I 100 REM ******** BLOCK SAVE / LOAD USING THE KERNA 
L ROUTINES ******** 

1.10 REM MAPPING THE VIC-20{13 SPACES } G. R. DAVIES 
r~! {14 SPACES} 8/8/83 

' ' 120 : 

130 ACT ?=" SAVE" 

140 NAME$="A.FILE" 

150 FROM=24576 
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160 LAST=24678 ^ 

170 RELO$="YES" 

180 EOT$=='NO" — - 

190 FILE=11 LJ 

200 LAST=LAST+1 

210 NAME $=LEFT$( NAME?, 94) : REM TRUNCATE NAME TO 9 

4 CHARS 
220 NL=LEN(NAME$) 
230 : 
240 IF ACT$ = "SAVE" AND LAST < FROM THEN PRINT " 

{RVSIEND < START": END 
250 IF ACT? = "SAVE" AND LAST > 32767 THEN PRINT" 

{RVS}CANT SAVE TO TAPE ABOVE 32767": END 
260 : 
270 PRINT" {RVS} "ACT?: PRINT" {RVS}NAME="CHR?( 34) ;NAM 

E?;CHR?(34) 
280 PRINT" {RVS}START="FROM: PRINT" {RVS}END="LAST: PR 

INT " [ RVS } REL0= " RELO? " EOT= " EOT? 
290 PRINT "O.K.? (Y/N)" 
300 GET X?:IF X?="" GOTO300 
310 IF X?="N" THEN END 
320 IF X?<>"Y" GOTO 300 
330 : 

340 POKE 144,0 : REM RESET STATUS 
350 IF ACT? = "SAVE" GOTO 400 
360 IF ACT? = "LOAD" THEN 670 
370 PRINT" {RVS} ACT? NOT = SAVE OR LOAD": END 
380 : 

390 ***** SAVE ***** 

400 POKE 780,128+64 : REM SET KERNAL MSGS ON 
410 SYS 65424 : REM CALL SETMSG 
420 : 

430 POKE 780, FILE : REM FILE NUMBER 
440 POKE 781, 1{3 SPACES}: REM DEVICE 
450 SA=0:IF RELO?= "NO" THEN SA=1 
460 IF EOT? = "YES" THEN SA=SA+2 
470 POKE 782, SA : REM SECONDARY ADDRESS 
480 SYS 65466 : REM CALL SETLFS 

490 : If 

500 POKE 780, NL : REM NAME LENGTH U 

510 IF NAME$<>"" THEN F0RX=1T0NL: POKE672+X, ASC( MI 

D?(NAME?,X,1) ):NEXT 
520 POKE 781,161: REM LSB OF NAME PTR \i 

530 POKE 782,2 : REM MSB OF NAME PTR ^^ 

540 SYS 65469 : REM CALL SETNAM 
550 : 
560 POKE 780,251 :REM PAGE ZERO OFFSET TO START OF 

SAVE POINTER 
570 POKE 252,INT(FROM/256) : REM MSB OF START OF S 

AVE 
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580 POKE 25.1, FROM-PEEK( 252 )*256 : REM LSB OF START 
OF SAVE 
O 590 POKE 782, INT (LAST/256) : REM MSB OF END PLUS I 
' I 600 POKE 781,LAST-PEEK(782)*256 : REM LSB OF END O 
F SAVE +1 

610 SYS 65496 : REM CALL SAVE 
n 620 : 

630 IF ST X THEN PRINT"{2 SPACES} {RVS}ST= "ST: EN 
D 

640 PRINT: PRINT "* SAVE COMPLETED *":END 

650 : 

660 ***** LOAD ***** 

670 POKE 780,128+64 : REM SET KERNAL MSGS ON 

680 SYS 65424 : REM CALL SETMSG 

690 : 

700 POKE 780, FILE : REM FILE NUMBER 

710 POKE 781, 1{ 3 SPACES}: REM DEVICE 

720 SA=0:IF RELO$= "NO" THEN SA=1 :REM USE HDR 

730 POKE 782, SA : REM SECONDARY ADDRESS 

740 SYS 65466 : REM CALL SETLFS 

750 : 

760 POKE 780, NL : REM NAME LENGTH 

770 IF NAME$<>"" THEN F0RX=1T0NL: POKE672+X, ASC( MI 
D$(NAME$,X,1) ):NEXT 

780 POKE 781,161: REM LSB OF NAME PTR 

790 POKE 782,2 : REM MSB OF NAME PTR 

800 SYS 65469 : REM CALL SETNAM 

810 : 

820 POKE 780,0 :REM LOAD INDICATOR 

830 POKE 782, INT (FROM/256) : REM MSB OF START OF L 
OAD 

840 POKE 781,FROM-PEEK(782)*256 : REM LSB OF START 
OF LOAD 

850 SYS 65493 : REM CALL LOAD 

860 : 

870 REM{2 SPACES}IF ST = 36 THEN POKE 144,0 : REM 
{SPACE} 36 MAY BE NORMAL 

880 IF ST X THEN PRINT" {RVS}ST="ST" {OFF} " 
'^ 890 IF ST <> THEN PRINT" {RVS}L0AD ERROR" : END 
' 900 PRINT: PRINT"* LOAD COMPLETED *" : END 
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Bitmapping u 

Custom Characteis jj 

The ability to define your own custom character sets is a powerful 
tool for extending the display capabilities for the VIC. High-resolu- 
tion bitmapped displays are created using single- or double-sized (8 
X 16) characters in a dynamically built custom character set. Separate 
coloring of pairs of pixels can be obtained, freeing the display from 
the limitations of character size coloring. 

This appendix will briefly demonstrate the use of custom charac- 
ter sets, multicolor mode, and screen bitmapping. Before we begin, 
you should be familiar with the discussions of the character sets that 
are presented at locations 32768 ($8000) and 36869 ($9005) of the 
memory map. You'll be using that information as you define a cus- 
tom character set. 

For a maze-type game program, you could use the standard 
character graphics to generate the actual maze design, and then use 
custom characters to represent the figures in the maze. For our 
example, we'll design characters for a takeoff on a well-known maze 
game; we'll need a chomping Commodore logo symbol, a few ghosts 
to chase it around, a cherry bonus symbol, and a power pill symbol. 

Because we'll want to run the game on either an unexpanded or 
expanded VIC-20, the BASIC area, screen map, and character map 
wUl be positioned to work in either condition. Since the number of 
custom characters is small, the routine at 641-642 will be placed on 
the game's tape to unexpand any memory expansion. To that routine 
you could add the POKE of characters 131 and 13 into the keyboard 
buffer at 631-632, and 2 into location 198. This will cause the next 
tape file to be loaded and run, which will be the maze game main 
program. The program can then expect the memory configuration to 
be unexpanded, with the screen at 7680. When the game is stopped 
by the player's request, a SYS 64802 will be used to reexpand any 
expansion and reset the VIC-20. 

The first thing the game program needs to do is to lower the 
upper limit of BASIC to protect the rustom character set at locations 
7168-7679. This location, with its 512 bytes, allows 64 custom 
characters, as well as the wraparound indexing into the normal 
character set reverse characters (although they will appear as 
unreversed) for scores, titles, and the like. POKE 55,0: POKE 56,28 
:CLR will protect our custom character set map. POKE 
36869,PEEK(36869) AND 240 OR 15 will set the address of the cus- 
tomer character set in the VIC chip register. FOR X=0 TO 
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8*64:POKE 7168+X,0:NEXT will clear out the 64-character area. The 
next 64 characters are actually part of the screen map area, and you 
can avoid them by not using the values from 64 to 127 as screen 
POKE codes. The four custom characters can be set into the charac- 
ter set with the lines: 

100 FOR X=0 TO 4*8-1: READ C 

110 POKE 7168+X,C:NEXT:GOTO 300 

120 DATA 56,124,84,124,124,124,84,0 

130 DATA 0,2,4,56,124,116,56,0 

140 DATA 120,255,222,192,222,255,120,0 

150 DATA 146,56,124,238,108,124,56,146 

300 : 

The rest of your program would begin at line 300. 

Now you can POKE into the screen map the locations where 
you want your custom characters to appear: 0= ghost, 1= cherry, 
2= logo, 3= power pill. The remaining 60 characters of the custom 
character set can be used for any additional characters you'd like. 
The POKE codes 64-127 should be avoided since they would obtain 
character pixel mapping information from the ever-active screen map 
area. The maze can be drawn by using screen POKE codes from 190 
to 255. See the Code Chart in Appendix C, remembering to use 
characters above 63 and that they will not appear in reverse. The 
chart also shows that 129-154 are the screen POKE codes for the 
alphabet, and 176-185 can be used for keeping score. 

More than one 8x8 character pixel map can be used if you 
want to create a shape larger than one character. For example, the 
following statements define a four-character shape of a three- 
dimensional cube that is constructed on the screen by POKEing the 
first and second characters side by side, with the third and fourth 
below them: 

DATA 15,16,32,64,255,128,128,128 
DATA 255,3,5,9,241,17,17,17 
DATA 128,128,128,128,128,128,128,255 
DATA 17,17,17,17,18,20,24,240 

Multicolor mode may be used to color with 4 of 16 colors within 
a character. Location 37888 describes multicolor mode; locations 
36879 and 36878 note the valid color codes. A tiny American flag 
could be created on the side of a ship with the line DATA 
5,10,5,10,85,170,85,170 if the background color was blue, the border 
red, and you POKE 9 (white foreground and multicolor mode) into 
the color map location for the character. 

You'll find a custom character editing program a great help 
when you design characters. Some character editors will generate the 
BASIC DATA statements that can be included in a program. There 
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are several good character editors available. One such editor 
appeared in COMPUTEl's First Book of VIC. By David Malmberg, it's 
also included in the article "Custom Characters For the VIC." 

Bitmapping 

Bitmapping the screen requires a custom character set made of pixel 
maps v^rhich describes every pixel on the screen to be mapped. This 
isn't necessarily the whole screen, and in fact most bitmapping pro- 
grams (including the Super Expander cartridge) settle for 20 columns 
by 22 lines. An unexpanded VIC-20 has to limit the area to be 
bitmapped. 

The first thing you must decide is the number of lines and col- 
umns that are to be bitmapped. A windows on the screen must then 
be created to fit that size. Every screen position showing requires 
eight bytes to bitmap. If you choose the 22 line by 20 column for- 
mat, for instance, you'll need 22*20*8=3520 bytes for a character set 
to bitmap that area. A (22*20)/2=220 byte screen map is also 
needed. The total amount of memory required for the screen and 
character maps for a 20 x 22 display is thus 3740 bytes. It's obvious 
that BASIC has to be placed in expansion memory. 

You can divide the needed screen map area in half by using the 
double-sized character feature. Simply specify it in location 36867, 
bit 0. You would need to use that featvire anyway since it's the only 
way that unique index numbers can be placed in all the displayed 
screen map bytes. 

For an unexpanded VIC-20, al2xl6(192 bytes) display area 
leaves 1535 bytes of BASIC area free after the character set and 
screen map are accounted for. This is done by placing BASIC at 
6144, the screen at 5632, and 190 custom characters at 4096. Charac- 
ters with screen POKE codes of 192-255 will overlap the screen 
area, so don't use them. The foUovwng direct mode lines set the 
BASIC and screen boundaries: 

POKE 43,0: POKE 44,24 

NEW 

POKE 648,22: SYS 58648 (See these two locations in the memory 

map.) j_j 

Within your program, the statement POKE 36869,PEEK(36869) AND 

240 OR 12 sets the character set pointer to 4096. To initialize the 

screen map for bitmapping, you could use: | (. 

FOR X=0 TO 191:POKE 5632+X,X:NEXT 

The character map area will include garbage that can be cleaned 
out with FOR X=0 TO 1519:POKE 4096+X,0:NEXT. Locations 
36878 and 36879 can be set to the desired color combinations, and 
36867 could be set to double-sized characters. The screen size of 13 
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by 14 is set by POKE 36866,13+128 (the 128 is part of the screen 
address) and POKE 36867,14*2. To center the window on the dis- 

n play, POKE 36864,13 POKE 36865,40. 

' ' The color map starts at location 38400 and can be set to the 

appropriate color code (multicolor bit included, if desired) when a 

(— { character is placed on the screen. Remember that when double-sized 

I ; characters are selected, a color nybble corresponds to a double-sized 

character. Alternatively, you may want to initialize the entire color 
map to a particular default color code, so that you don't need to 
bother with it for the bulk of your work. 

All the setup is now done, and you're ready to set the custom 
character map to whatever strikes your imagination and see it in- 
stantly appear at the same offset on the screen as the number of the 
double-sized character. Location 4096 ($1000) has several formulas 
that can be used to calculate pixel locations from the desired line and 
column. Change the number 22 in those formulas to the width of 
your chosen display window. 

A 40-column screen. Here are the definitions for a half-width set of 
letters and numbers. These definitions will allow you to create the 
illusion of twice as many characters per line so a 40-column display 
can be simulated. These definitions can be used with a large custom 
character set, but are best suited for a bitmapped screen. When using 
the definitions, store them someplace other than the custom charac- 
ter set, and move the needed 4 x 8 bit pixel map to the appropriate 
right or left side of a 8 x 8 sized character, or quarter of the double- 
sized character. 

DATA 76,170,170,236,170,170,172,0: REM AB 

DATA 76,170,138,138,138,170,76,0: REM CD 

DATA 238,136,136,204,136,136,232,0: REM EF 

DATA 106,138,138,174,170,170,106,0: REM GH 

DATA 226,66,66,66,66,74,228,0: REM IJ 

DATA 136,136,136,168,200,200,174,0: REM KL 

DATA 160,236,234,170,170,170,170,0: REM MN 

DATA 236,170,170,172,168,168,232,0: REM OP 
r-< DATA 72,172,170,170,168,232,104,0: REM QR 

i '■ DATA 78,164,132,68,36,164,68,0: REM ST 

DATA 170,170,170,170,170,164,228,0: REM UV 
_. DATA 170,170,164,164,228,234,170,0: REM WX 

( i DATA 174,160,226,68,72,64,78,0: REM YZ 

DATA 206,74,66,68,72,72,238,0: REM 12. 

DATA 234,42,42,110,34,34,226,0: REM 34 
n DATA 238,136,136,206,42,42,206,0: REM 56 

DATA 238,170,42,78,74,74,78,0: REM 78 

DATA 228,170,170,234,42,42,36,0: REM 90 
r^ DATA 0,0,0,0,0,2,68,0: REM ., 

' ' DATA 64,160,32,64,64,0,64,0: REM ? SPACE 
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Alphabetical Cross 
Reference to the Location of 
Memory Map Labels 



Label 


Defined at 


ABS 


56408 ($DC58) 


ACPTR 


61209 ($EF19) 


ADDPRC 


1-2 ($1-2) 


ADDSTR 


54845 ($D63D) 


ADRAYl 


3-4 ($3-4) 


ADRAY2 


5-6 ($5-6) 


ALCSPC 


54516 ($D4F4) 


ALCl 


54389 ($D475) 


ANDD 


53225 ($CFE9) 


ARG 


105-110 ($69-6E) 


ARGEXP 


105-110 ($69-6E) 


ARISGN 


111 ($6F) 


ARY 


53713 ($D1D1) 


ARYHED 


53652 ($D194) 


ARYTAB 


47-48 ($2F-30) 


ARY2 


53837 ($D24D) 


ARY6 


53857 ($D261) 


ARY14 


53994 ($D2EA) 


ASC 


55179 ($D78B) 


ASCFLT 


56563 ($DCF3) 


ASCII 


215 ($D7) 


ASC18 


56702 ($DD7E) 


ASRRES 


55683 ($D983) 


ATN 


58123 ($E30B) 


ATNCON 


58171 ($E33B) 


ATOF 


56316 ($DBFC) 


AUTODN 


658 ($292) 


AOCBM 


64845 ($FD4D) 


BACKUP 


59624 ($E8E8) 


BAD 


256-318 ($100-13E) 


BADSUB 


53829 ($D245) 


BASIC 


49152-57343 ($C000-DFFF) 


BASICSPILL 


57344-58527 ($E000-E49F) 


BASTACK 


320-511 ($140-1FF) 


BASVCTRS 


58447 ($E44F) 


BASZPT 


255 ($FF) 


BAUDOF 


665-666 ($299-29A) 


BAUDTBL 


65372 ($FF5C) 
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BITCI 168 ($A8) 

BITNUM 664 ($298) 

BITS 104 ($68) 

BITTS 180 ($B4) 

BLKEND 64518 ($FC06) 

BLNCT 205 ($CD) 

BLNON 207 ($CF) 

BLNSW 204 ($CC) 

BLOAD 57701 ($E165) 

BMSGS 49960 ($C328) 

BREAK 65234 ($FED2) 

BSAVE 57683 ($E153) 

BSIV 64758 ($FCF6) 

BSOUR 149 ($95) 

BSTOP 51247 ($C82F) 

BUF 512-600 ($200-258) 

BUFPNT 166 ($A6) 

BUMPTP 51451 ($C8FB) 

BVECTORS 768-778 ($300-30A) 

BVERIF 57698 ($E162) 

CACPTR 65445 ($FFA5) 

CASEL 34816-35839 ($8800-8BFF) 

CASELRV 35840-36863 ($8C00-8FFF) 

CASEU 32768-33791 ($8000-83FF) 

CASEURV 33792-34815 ($8400-87FF) 

CASl 192 ($C0) 

CBINV 790-791 ($316-317) 

CBMBASIC 49156 ($C004) 

CBMMSG 58409 ($E429) 

CCALL 65511 ($FFE7) 

CCHROUT 65490 ($FFD2) 

CCIOUT 65448 ($FFA8) 

CCLOS 65475 ($FFC3) 

CCLRCHN 65484 ($FFCC) 

CGETL 65508 ($FFE4) 

CGIMAG 58247 ($E387) 

CHANNL 19 ($13) 

CHARAC 7 ($7) 

CHARSET 60705 ($ED21) 

CHKAUTO 64831 ($FD3F) 

CHKIN 62151 ($F2C7) 

CHKOUT 62217 ($F309) 

CHR 55020 ($D6EC) 

CHRERR 57870 ($E20E) 

CHRGET 115-138 ($73-8A) 

CHRGOT 121 ($79) 
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CHRIN 


61966 ($F20E) 


CHRINRS 


62063 ($F26F) 


CHRINSR 


62052 ($F264) 


CHRINTP 


62000 ($F230) 


CHRINTP2 


62032 ($F250) 


CHROUT 


62074 ($F27A) 


CHROUTTP 


62096 ($F290) 


CHRIST 


53523 ($D113) 


CINCH 


65487 ($FFCF) 


CINV 


788-789 ($314-315) 


CIOBASE 


65523 ($FFF3) 


CIOUT 


61156 ($EEE4) 


CLALL 


62447 ($F3EF) 


CLISTEN 


65457 ($FFB1) 


CLOAD 


65493 ($FFD5) 


CLOSE 


62282 ($F34A) 


CLR 


50782 ($C65E) 


CLRALINE 


60045 ($EA8D) 


CLRCHN 


62451 ($F3F3) 


CLSR 


58719 ($E55F) 


CMD 


51846 ($CA86) 


CMEMBOT 


65436 ($FF9C) 


CMEMTOP 


65433 ($FF99) 


CMPFAC 


56411 ($DC5B) 


CMPST 


53294 ($D02E) 


CMPO 


176 ($B0) 


CNTUN 


165 ($A5) 


CNVRTCD 


59689 ($E929) 


COLDBA 


58232 ($E378) 


COLDST 


49152 ($C000) 


COLECT 


54790 ($D606) 


COLOR 


646 ($286) 


COLORMAPS 


37888-38399 ($9400-95FF) 


COLORSET 


59666 ($E912) 


COLORSYN 


60082 ($EAB2) 


COLORTBL 


59681 ($E921) 


COMCHK 


52989 ($CEFD) 


COMFAC 


55623 ($D947) 


COMPAR 


53270 ($D016) 


CONT 


51287 ($C857) 


COPEN 


65472 ($FFC0) 


COS 


57953 ($E261) 


COUNT 


11 ($B) 


CPLOT 


65520 ($FFFO) 


CRDST 


65463 ($FFB7) 


CRDTIM 


65502 ($FFUE) 
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CRESTOR 


65418 ($FF8A) 




CRNCH 


50553 ($C579) 


f—t 


CRSW 


208 ($D0) 


, i 


CSAVE 


65496 ($FFD8) 




CSCNKEY 


65439 ($FF9F) 


^■^ 


CSCREEN 


65517 ($FFED) 


1 \ 


CSECOND 


65427 ($FF93) 




CSETLFS 


65466 ($FFBA) 




CSETMSG 


65424 ($FF90) 




CSETNAM 


65469 ($FFBD) 




CSETTIM 


65499 ($FFDB) 




CSETTMO 


65442 ($FFA2) 




CSTEL 


63636 ($F894) 




CSTE2 


63671 ($F8B7) 




CSIO 


63659 ($F8AB) 




CTALK 


65460 ($FFB4) 




CTKSA 


65430 ($FF96) 




CTRLKEYS 


60835 ($EDA3) 




CUDTIM 


65514 ($FFEA) 




CUNLSN 


65454 ($FFAE) 




CUNTLK 


65451 ($FFAB) 




CURLIN 


57-58 ($39-3A) 




CVECTOR 


65421 ($FF8D) 




C3P0 


148 ($94) 




C5FFS 


65413 ($FF85) 




DATLIN 


63-64 ($3F-40) 




DATPTR 


65-66 ($41-42) 




DECBIN 


51563 ($C96B) 




DEF 


54195 ($D3B3) 




DEFPNT 


78-79 ($4E-4D) 




DELAY 


652 ($28C) 




DELST 


54947 ($D6A3) 




DELTSD 


55003 ($D6DB) 




DFLTN 


153 ($99) 




DFLTO 


154 ($9A) 


1— 1 


DIM 


53377 ($D081) 


i i 


DIMFLG 


12 ($C) 




DIVIDE 


56082 ($DB12) 


/—I 


DIVTEN 


56062 ($DAFE) 


1 ] 
1 i 


DPSW 


156 ($9C) 




DSCPNT 


80-81 ($50-51) 




EAL 


174-175 ($AE-AF) 


r-i 

/ i 


END 


51249 ($C831) 




ENDCHR 


8 ($8) 




ERROR 


50231 ($C437) 


n 


ERRTAB 


49566 ($C19E) 
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EVAL 


52867 ($CE83) 


EVALFN 


54260 ($D3F4) 


EVFN3 


54351 ($D44F) 


EVLVAR 


53387 ($D08B) 


EXP 


57325 ($DFED) 


EXPCON 


57279 ($DFBF) 


EXPONT 


57211 ($DF7B) 


EXTRA 


52476 ($CCFC) 


FA 


lMf$BA) 


FAG 


97-102 ($61-66) 


lACOV 


112 ($70) 


FACTFP 


56272 ($DBDO) 


FACTFl 


56266 ($DBCA) 


FACTF2 


56263 ($DBC7) 


FACTIO 


53005 ($CFOD) 


FACT12 


53032 ($CF28) 


FACT17 


53159 ($CFA7) 


FAC2 


105-110 ($69-6E) 


FAH 


63407 ($F7AF) 


FAT 


611-620 ($263-26C) 


FBUFPT 


113-114 ($71-72) 


FCLOSE 


57796 ($E1C4) 


FILEMSG 


63358 ($F77E) 


FILENAME 


63065 ($F659) 


FILFAC 


56553 ($DCE9) 


FIND2 


51462 ($C906) 


FINLIN 


50707 ($C613) 


FINLMR 


55137 ($D761) 


HRT 


164 ($A4) 


FLP05 


57105 ($DF11) 


FLTASC 


56797 ($DDDD) 


FLTCON 


57110 ($DF16) 


FN 


54241 ($D3E1) 


FNADR 


187-188 ($BB-BC) 


FNDFLNO 


62415 ($F3CF) 


FNDHDR 


63591 ($F867) 


FNDVAR 


53479 ($D0E7) 


FNLEN 


183 ($B7) 


FOPEN 


57787 ($E1BB) 


FOR 


51010 ($C742) 


FORPNT 


73-74 ($49-4A) 


FORWARD 


59642 ($E8FA) 


FOUR6 


83 ($53) 


FPCTEN 


56057 ($DAF9) 


FPCl 


55740 ($D9BC) 


FPC12 


56755 ($DDB3) 
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FPC20 


58077 {$E2DD) 


FPINT 


56475 ($DC9B) 


FRE 


54141 ($D37D) 


FREKZP 


251-254 ($FB-FE) 


FREMSG 


58372 ($E404) 


FRESPC 


53-54 ($35-36) 


FRETOP 


51-52 ($33-34) 


FRMEVL 


52638 ($CD9E) 


FSBLK 


190 ($BE) 


FTOA 


56335 ($DCOF) 


FUNDSP 


49234 ($C052) 


GARBFL 


15 ($F) 


GC0L13 


54717 ($D5BD) 


GDBLN 


206 ($CE) 


GDCOL 


647 ($287) 


GET 


52091 ($CB7B) 


GETAD 


55275 ($D7EB) 


GETBYT 


55195 ($D79B) 


GETIN 


61941 ($F1F5) 


GETLIN 


50528 ($C560) 


GETQUE 


58853 ($E5E5) 


GETSCRN 


58959 ($E64F) 


GETSUB 


53682 ($D1B2) 


GET2RTN 


58905 ($E619) 


GONE 


51172 ($C7E4) 


GOSUB 


51331 ($C883) 


GOTO 


51360 ($C8A0) 


GRAPHMODE 


60720 ($ED30) 


GRBCOL 


54566 ($D526) 


GSINFO 


55170 ($D782) 


HIBASE 


648 ($288) 


HMSCON 


57146 ($DF3A) 


HOME 


58753 ($E581) 


IBASIN 


804-805 ($324-325) 


IBSOUT 


806-807 ($326-327) 


ICHKIN 


798-799 ($31E-31F) 


ICKOUT 


800-801 ($320-321) 


ICLALL 


812-813 ($32C-32D) 


ICLOSE 


796-797 ($31C-31D) 


ICLRCH 


802-803 ($322-323) 


ICRNCH 


772-773 ($304-305) 


TERROR 


768-769 ($300-301) 


lEVAL 


778-779 ($30A-30B) 


IF 


51496 ($C928) 


IFCHRG 


57859 ($E203) 


IGETIN 


810-811 ($32A-32B) 
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IGONE 


776-777 ($308-309) 


IGRERR 


52045 ($CB4D) 


ILOAD 


816-817 ($330-331) 


ILQUAN 


53832 ($D248) 


IMAIN 


770-771 ($302-303) 


INBIT 


167 ($A7) 


INDEX 


34-37 ($22-25) 


mm 


200 ($C8) 


INITBA 


58276 ($E34A) 


INITMEM 


64909 ($FD8D) 


INITSK 


58648 ($E518) 


INITVCTRS 


58459 ($E45B) 


INITVIA 


65017 ($FDF9) 


IMirVIG 


58819 i($E5C3) 


INPCHN 


65478 ($FFC6) 


INPFLG 


17 ($11) 


INPPTR 


65-67 ($43-44) 


INPUT 


52159 ($CBBF) 


INPUTN 


52133 ($CBA5) 


INSRT 


216 ($D^ 


INT 


56524 ($DCCC) 


INTFLG 


14 ($E) 


INTFP 


56380 ($DC3C) 


INTFPl 


56388 ($DC44) 


INTIDX 


53674 ($D1AA) 


lOBASE 


58624 ($E500) 


lOPEN 


794-795 ($31A-31B) 


IQPLOP 


774-775 ($306-307) 


IRQ 


60095 ($EABF) 


IRQROUT 


65394 ($FF72) 


IRQTMP 


671-672 ($29F-2A0) 


IRQVCTRS 


65009 ($FDF1) 


ISAVE 


818-819 ($332-333) 


ISCNTG 


65505 ($FFE1) 


ISTOP 


808-809 ($328-329) 


JMPER 


84-86 ($54-56) 


JTP20 


63626 ($F88A) 


KERNAL 


58528-65535 ($E4A0-FFFF) 


mm 


631-640 ($277^^ ^ 


KEYLOG 


655-656 ($28F-290) 


KEYTAB 


245-246 ($F5-F6) 


KEYVCTRS 


60486 ($EC46) 


KMSGSHOW 


61926 ($F1E6) 


KMSGTBL 


61812 ($F174) 


KOUNT 


651 ($28B) 


KVECIDIS 


:788-819 ($314^333) 
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LA 


184 ($B8) 


LADIV 


56079 ($DBOF) 


LAMIN 


55376 ($D850) 


LAPLUS 


55399 ($D867) 


LASTPT 


23-24 ($17-18) 


LAT 


601-610 ($259-262) 


LDADl 


63572 ($F854) 


LDTBl 


217-241 ($D9-F1) 


LDTB2 


60925 ($EDFD) 


LDTND 


152 ($98) 


LDVRMSG 


63082 ($F66A) 


LEFT 


55040 ($D700) 


LEN 


55164 ($D77C) 


LET 


51621 ($C9A5) 


LEl'2 


51650 ($C9C2) 


LETS 


51674 ($C9DA) 


LET9 


51756 ($CA2C) 


LINNUM 


20-21 ($14-15) 


LINPTR 


60030 ($EA7E) 


LIST 


50844 ($C69C) 


LISTEN 


60951 ($EE17) 


LISTl 


60956 ($EE1C) 


LNKPRG 


50483 ($C533) 


LNMX 


213 ($D5) 


LOAD 


62786 ($F542) 


LOADSER 


62812 ($F55C) 


LODARG 


55948 ($DA8C) 


LODFAC 


56226 ($DBA2) 


LOG 


55786 ($D9EA) 


LOGCON 


55745 ($D9C1) 


LOGOKEYS 


60640 ($ECEO) 


LPACHK 


52986 ($CEFA) 


LP2 


58831 ($E5CF) 


LSTSHF 


654 ($28E) 


LSTX 


197 ($C5) 


LXSP 


201-202 ($C9-CA) 


MAIN 


50304 ($C480) 


MAKADR 


55287 ($D7F7) 


MAKFP 


54161 ($D391) 


MAKINT 


53695 ($D1BF) 


MAKSPC 


50104 ($C3B8) 


MAKSTR 


54407 ($D487) 


MAKVAR 


53533 ($D11D) 


MAXINT 


53669 ($D1A5) 


MEMBOT 


65154 ($FE82) 


MEMERR 


50229 ($C435) 
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MEMHIGH 


643-644 ($283-284) 


MEMSiZ 


55-56 ($37-38) 


MEMSTR 


641-642 ($281-282) 


MEMTOP 


65139 ($FE73) 


MEMUSS 


195-196 ($C3-C4) 


MID 


55095 ($D737) 


MISCMSG 


50020 ($C364) 


MODE 


657 ($291) 


MOVEBL 


50111 ($C3BF) 


MOVLINE 


59990 ($EA56) 


MSGFLG 


157 ($9D) 


MULDIV 


55991 ($DAB7) 


MULTEN 


56034 ($DAE2) 


MYCH 


191 ($BF) 


M16 


54092 ($D34C) 


M51AJB 


661-662 ($295-296) 


M51CDR 


660 ($294) 


M51CTR 


659 ($293) 


NDX 


198 ($C6) 


NEGFAC 


57268 ($DFB4) 


NEW 


50754 ($C642) 


NEWCH 


64475 ($FBDB) 


NEWLIN 


50332 ($C49C) 


NEWSTT 


51118 ($C7AE) 


NEXT 


52510 ($CD1E) 


NMI 


65193 ($FEA9) 


NMINV . 


792-793 ($318-319) 


NODIRM 


54182 ($D3A6) 


NORMKEYS 


60510 ($EC5E) 


NORMLZ 


55550 ($D8FE) 


NXTBIT 


181 ($B5) 


NXTLINE 


59587 ($E8C3) 


OLDLIN 


59-60 ($3B-3C) 


OLDTXT 


61-62 ($3D-3E) 


ON 


51531 ($C94B) 


OPEN 


62474 ($F40A) 


OPENLIN 


59886 ($E9EE) 


OPENRS 


62663 ($F4C7) 


OPMASK 


11 ($4D) 


OPPTR 


75-76 ($4B-4C) 


OPTAB 


49280 ($C080) 


ORIOST 


65130 ($FE6A) 


ORR 


53222 ($CFE6) 


OUTCHN 


65481 ($FFC9) 


OVERFL 


55678 ($D97E) 


PAREXP 


52977 ($CEF1) 
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PAROC 


57878 ($E216) 


PARSL 


57809 ($E1D1) 


PATCHBAS 


57590 ($E0F6) 


PATCHER 


58486 ($E476) 


PATCHES 


58556 ($E4BC) 


PCNTR 


163 ($A3) 


PEEK 


55309 ($D80D) 


PG3FREE 


784-787 ($310-313) 


PIVAL 


52904 ($CEA8) 


PLOT 


58634 ($E50A) 


PLUS 


55402 ($D86A) 


PLUSl 


55394 ($D862) 


PLUS6 


55463 ($D8A7) 


PNT 


209-210 ($D1-D2) 


PNTR 


211 ($D3) 


POKE 


55332 ($D824) 


POS 


54174 ($D39E) 


PRDY 


50281 ($C469) 


PRINT 


51872 ($CAAO) 


PRINTN 


51840 ($CA80) 


PRTFIX 


56781 ($DDCD) 


PRTIN 


56770 ($DDC2) 


PRTOS 


52027 ($CB3B) 


PRTSTR 


51998 ($CB1E) 


PRTY 


155 ($9B) 


PRTl 


51866 ($CA9A) 


PRT6 


51944 ($CAE8) 


PRT7 


51960 ($CAF8) 


PTRl 


158 ($9E) 


PTR2 


159 ($9F) 


PUTSCRN 


60074 ($EAAA) 


QPLOP 


50970 ($C71A) 


QTSW 


212 ($D4) 


QUOTECK 


59064 ($E6B8) 


RAMBLKO 


1024-4095 ($400-FFF) 


RAMBLKl 


8192-16383 ($2000-3FFF) 


RAMBLK2 


16384-24575 ($4000-5FFF) 


RAMBLK3 


24576-32767 ($6000-'/FFF) 


RAMBLK4 


40960-49151 ($A000-BFFF) 


RAMSPC 


50184 ($C408) 


RBLK 


63689 ($F8C9) 


RDTIM 


63328 ($F760) 


RDTPBLKS 


62680 ($F8C0) 


RD300 


64466 ($FBD2) 


READ 


52230 ($CC06) 


READIOST 


65128 ($FE68) 
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READST 


65111 ($FE57) 


READT 


63886 ($F98E) 


READY 


50292 ($C474) 


REM 


51515 ($C93B) 


RESHO 


38-42 ($26-2A) 


RESLST 


49310 ($C09E) 


RESTOR 


64850 ($FD52) 


RESTORE 


51229 ($C81D) 


RETREAT 


59181 ($E72D) 


RETURN 


51410 ($C8D2) 


RETVP 


53637 ($D185) 


RFTOA 


56332 ($DCOC) 


RIBUF 


247-248 ($F7-F8) 


RIDATA 


170 ($AA) 


RIDBE 


667 ($29B) 


RIDBS 


668 ($29C) 


RIGHT 


55084 ($D72C) 


RINONE 


169 ($A9) 


RIPRTY 


171 ($AB) 


RND 


57492 ($E094) 


RNDCl 


57482 ($E08A) 


tmx 


139-143 ($8B-8I) X 


ROBUF 


249-250 ($F9-FA) 


RODATA 


182 ($B6) 


RODBE 


670 ($29E) 


RODBS 


669 ($29D) 


ROPRTY 


189 ($BD) 


ROUND 


56347 ($DC1B) 


RPACHK 


52983 ($CEF7) 


RPTFLG 


650($28A) X 


RSBREAK 


61605 ($F0A5) 


RSCPTBIT 


61479 ($F027) 


RSDVCERR 


61625 ($F0B9) 


RSFRAMER 


61608 ($F0A8) 


RSINBIT 


61494 ($F036) 


RSINBYTE 


61551 ($F06F) 


RSINERR 


61610 ($F0AA) 


RSINPRTY 


61579 ($F08B) 


RSMISSNG 


61462 ($F016) 


RSNMI 


65246 ($FEDE) 


RSNXTBIT 


61347 ($EFA3) 


RSNXTBYT 


61422 ($EFEE) 


RSNXTIN 


61775 ($F14F) 


RSOPNIN 


61718 ($F116) 


RSOPNOUT 


61628 ($F0BC) 


RSOUTSAV 


61677 ($F0ED) 
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RSOVERUN 


61602 ($F0A2) 


RSPAUSE 


61792 ($F160) 


RSPREPIN 


61531 ($F05B) 


RSPREPOT 


61698 ($F102) 


RSPRTY 


61375 ($EFBF) 


RSPRTYER 


61597 ($F09D) 


RSSTAT 


663 ($297) 


RSSTOPS 


61416 ($EFE8) 


RSSTPBIT 


61515 ($F04B) 


RSSTRBIT 


61544 ($F068) 


RTI 


65366 ($FF56) 


RTRN 


59608 ($E8D8) 


RUN 


51313 ($C871) 


RUNTB 


60916 ($EDF4) 


RVS 


199 ($C7) 


SA 


185 ($B9) 


SAL 


172-173 ($ AC-AD) 


SAREG 


780 ($30C) 


SAT 


621-630 ($26D-276) 


SAVE 


63093 ($F675) 


SAVESER 


63122 ($F692) 


SAVETP 


63217 ($F6F1) 


SAVING 


63272 ($F728) 


SAVREGS 


780-783 ($30C-30F) 


SCATN 


61125 ($EEC5) 


SCNKEY 


60190 ($EB1E) 


SCNSTK 


50058 ($C38A) 


SCREEN 


7680-8191 ($1E00-1FFF) 


SCREENX 


4096-4607 ($1000-11FF) 


SCRL 


59765 ($E975) 


SCRN 


58629 ($E505) 


SCRNOUT 


59202 ($E742) 


SCROLL 


59114 ($E6EA) 


SECOND 


61120 ($EECO) 


SEREVL 


57408 ($E040) 


SERGET 


58546 ($E4B2) 


SERNAME 


62613 ($F495) 


SEROUTO 


58537 ($E4A9) 


SEROUTl 


58528 ($E4A0) 


SER2 


57430 ($E056) 


SETADDR 


60014 ($EA6E) 


SETCHAR 


59077 ($E6C5) 


SETFLCH 


62431 ($F3DF) 


SETIODEF 


58811 ($E5BB) 


SETKEYS 


60380 ($EBDC) 


SETLFS 


65104 ($FE50) 
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SETMSG 

SETNAM 

SETSLINK 

SETTIM 

SETTMO 

SFDX 

SGN 

SGNEAC 

SGNFLG 

SHFLAG 

SHFTKEYS 

SIN 

SIZE 

SKIPST 

SKPCOM 

SPMSG 

SPREG 

SQR 

SRBAD 

SRCHING 

SRCLKHI 

SRCLKLO 

SRSEND 

STACK 

STAL 

START 

STATUS 

STKEY 

STKSPC 

STMDSF 

STOP 

STORFAC 

STR 

STREND 

STTl 

STXTPT 

SUB 

SUBFLG 

SVXT 

SXREG 

SYNCHR 

SYNERR 

SYNO 

SYNPRT 

SYREG 

SYSTEM 
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65126 ($FE66) 
65097 ($FE49) 
58759 ($E587) 
63335 ($F767) 
65135 ($FE6F) 
203 ($CB) 
56377 ($DC39) 
56363 ($DC2B) 
103 ($67) 
653 ($28D) 
60575 ($EC9F) 
57960 ($E268) 
82 ($52) 
51448 ($C8F8) 
57867 ($E20B) 
61922 ($F1E2) 
783 ($30F) 
57201 ($DF71) 
61108 ($EEB4) 
63047 ($F647) 
61316 ($EF84) 
61325 ($EF8D) 
61001 ($EE49) 
256-511 ($100-1FF) 
193-194 ($C1-C2># 
64802 ($FD22) 

144 ($90) 

145 ($91) 
50171 ($C3FB) 
49164 ($COOC) 
63344 ($F770) 
56276 ($DBD4) 
54373 ($D465) 
49-50 ($31-32) 
63837 ($F95D) 
50830 ($C68E) 
55379 ($D853) 
16 ($10) 

146 ($92) 

781 ($30D) 
52991 ($CEFF) 
53000 ($CF08) 
150 ($96) 
60065 ($EAA1) 

782 ($30E) 
57639 ($E127) 
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TALK 

TAN 

TANSGN 

TAPE 

TAPEH 

TAPEl 

TBLX 

TBUFFR 

TEMPF3 

TEMPPT 

TEMPST 

TEMPI 

TIME 

TIMES 

TIMES3 

TIMOUT 

TKSA 

TNIF 

TNOFF 

TPBLOCK 

TPBUFA 

TPHBGN 

TPHDRID 

TPHEND 

TPHFREE 

TPHNAME 

TPSTORE 

TPTOGLE 

TRMPOS 

TSTMEM 

TSTOP 

TSTSTOP 

TXTPTR 

TXTTAB 

TYPCHK 

UDTIM 

UNDEF 

UNLSN 

UNTLK 

UNUSDNMI 

USER 

USRCMD 

USRCMDS 

USRPGMOK 

USRPGM3K 

USRPGM8K 



60948 ($EE14) 

58033 ($E2B1) 

18 ($12) 

63732 ($F8F4) 

63463 ($F7E7) 

178-179 ($B2-B3) 

214 {$D6) 

828-1019 ($33C-3FB) 

87-96 ($57-60) 

22 ($16) 

25-33 ($19-21) 

177 ($B1) 

160-162 ($A0-A2) 

55848 ($DA28) 

55897 ($DA59) 

645 ($285) 

61134 ($EECE) 

64719 ($FCCF) 

64776 ($FD08) 

829-1019 ($33D-3FB) 

63565 ($F84D) 

829-830 ($33D-33E) 

828 ($33C) 

831-832 ($33F-340) 

1020-1023 ($3FC-3FF) 

833-1019 ($341-3FD) 

64173 ($FAAD) 

64490 ($FBEA) 

9 ($9) 

65169 ($FE91) 

63819 ($F94B) 

51244 ($C82C) 

122-123 ($7A-7B) 

43-44 ($2B-2C) 

52600 ($CD8A) 

63284 ($F734) 

54190 ($D3AE) 

61188 ($EF04) 

61174 ($EEF6) 

58805 ($E5B5) 

243-244 ($F3-F4) 

814-815 ($32E-32F) 

820-827 ($334-33B) 

4096-7679 ($1000-1DFF) 

4096-8191 ($1000-1FFF) 

4608-8191 ($1200-1FFF) 
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USRPOK 


0($0) 


USRVCTRS 


673-767 ($2A1-2R) 


VAL 


55213 ($D7AD) 


VALTYP 


13 ($D) 


mmiMA 


169^70 ($45-46) 


mRPNT 


71-72 ($47-48) 


VARRANGE 


53012 ($CF14) 


VARTAB 


45-46 ($2D-2^ 


VCTRIRQ 


65534 ($FFFE) 


VCTRNMI 


65530 ($FFFA) 


VCTRRST 


65532 ($FFFC) 


VECTOR 


64855 ($FD57) 


VECTORS 


64877 ($FD6D) 


VERCHK 


10 ($A) 


VERCK 


147 ($93) 


VIAIACR 


37147 ($91 IB) 


VIAIDDRA 


37139 ($9113) 


VIAIDDRB 


37138 ($9112) 


VIAIIER 


37150 ($91 IE) 


VIAIIFR 


37149 ($911D) 


VIAlPAl 


37137 ($9111) 


VIA1PA2 


37151 ($911F) 


VIAIPB 


37136 ($9110) 


VIAIPCR 


37148 ($911C) 


VIAISR 


37146 ($911A) 


VIAITICH 


37141 ($9115) 


VIAITICL 


37140 ($9114) 


VIAITILH 


37143 ($9117) 


VIAITILL 


37142 ($9116) 


VIA1T2CH 


37145 ($9119) 


VIA1T2CL 


37144 ($9118) 


VIA2ACR 


37163 ($912B) 


VIA2DDRA 


37155 ($9123) 


VIA2DDRB 


37154 ($9122) 


VIA2IER 


37166 ($912E) 


VIA2IFR 


37165 ($912D) 


VIA2PA1 


37153 ($9121) 


VIA2PA2 


37167 ($912F) 


VIA2PB 


37152 ($9120) 


VIA2PCR 


37164 ($912C) 


VIA2SR 


37162 ($912A) 


VIA2T1CH 


37157 ($9125) 


VIA2T1CL 


37156 ($9124) 


VIA2T1HL 


37159 ($9127) 


VIA2T1LL 


37158 ($9126) 


VIA2T2CH 


37161 ($9129) 
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i i. 


VIA2T2CL 


37160 ($9128) 




VICCRA 


36874 ($900A) 


i 


VICCRB 


36875 ($900B) 


VICCRC 


36876 ($900G) 




VICCRD 


36877 ($900D) 


^ 


VICCRE 


36878 ($900E) 


1 [ 


VICCRF 


36879 ($900F) 




VICCRO 


36864 ($9000) 




VICCRl 


36865 ($9001) 




VICCR2 


36866 ($9002) 




VICCR3 


36867 ($9003) 




VICCR4 


36868 ($9004) 




VICCR5 


36869 ($9005) 




VICCR6 


36870 ($9006) 




VICCR7 


36871 ($9007) 




VICCR8 


36872 ($9008) 




VICCR9 


36873 ($9009) 




VICINIT 


60900 ($EDE4) 




VPRTY 


64785 ($FD11) 




WAIT 


55341 ($D82D) 




WAITABIT 


61334 ($EF96) 




WARMBAS 


58471 ($E467) 




WARMST 


49154 ($C002) 




WBLK 


63715 ($F8E3) 




WHATKEYS 


60777 ($ED69) 




WRAPLINE 


60763 ($ED5B) 




WRI'l'E 


64523 ($FCOB) 




WRTNl 


64661 ($FC95) 




WRTZ 


64680 ($FCA8) 




WRT62 


64795 ($FD1B) 




XFERSTR 


54906 ($D67A) 




XMAX 


649 ($289) 




XSAV 


151 ($97) 




ZERFAC 


55543 ($D8F7) 


n 






t 






n 

1 ; 












n 
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Appendix I 

A Beginner's Guide to 
Typing In Programs 

What Is a Piogiam? 

A computer cannot perform any task by itself. Like a car without 
gas, a computer has potential, but without a program, it isn't going 
anywhere. Most of the programs published in this book are written 
in a computer language called BASIC. BASIC is easy to learn and is 
built into all VIC-20s. 

BASIC Programs 

Computers can be picky. Unlike the English language, which is full 
of ambiguities, BASIC usually has only one right way of stating 
something. Every letter, character, or number is significant. A com- 
mon mistake is substituting a letter such as O for the numeral 0, a 
lowercase 1 for the numeral 1, or an uppercase B for the numeral 8. 
Also, you must enter all punctuation such as colons and commas just 
as they appear in the book. Spacing can be important. To be safe, 
type in the listings exactly as they appear. 

Braces and Special Characten 

The exception to this typing rule is when you see the braces, such as 
{DOWN}. Anything within a set of braces is a special character or 
characters that cannot easily be listed on a printer. When you come 
across such a special statement, refer to Appendix J, "How to Type 
In Programs." 

About DATA Statements 

Some programs contain a section or sections of DATA statements. 
These lines provide information needed by the program. Some 
DATA statements contain actual programs (called machine lan- 
guage); others contain graphics codes. These lines are especially sen- 
sitive to errors. 

If a single number in any one DATA statement is mist)^ed, 
your machine could lock up, or crash. The keyboard and STOP key 
may seem dead, and the screen may go blank. Don't panic — no 
damage is done. To regain control, you have to turn off your com- 
puter, then turn it back on. This will erase whatever program was in 
memory, so always SAVE a copy of your program before you RUN it. If . 

your computer crashes, you can LOAD the program and look for | | 

your mistake. 

Sometimes a mistyped DATA statement will cause an error mes- 
sage when the program is RUN. The error message may refer to the M 
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program line that READs the data. The error is still in the DATA 
statements, though. 

Get to Know Your Machine 

You should familiarize yourself with your computer before attempt- 
ing to type in a program. Learn the statements you use to store and 
retrieve programs from tape or disk. You'll want to save a copy of 
your program, so that you won't have to type it in every time you 
want to use it. Learn to use your machine's editing functions. How 
do you change a line if you make a mistake? You can always retype 
the line, but you at least need to know how to backspace. Do you 
know how to enter reverse video, lowercase, and control characters? 
It's all explained in your VIC's manual. Personal Computing on the 
VIC. 

A Quick Review 

1. Type in the program a line at a time, in order. Press RETURN at 
the end of each line. Use the INST/DEL key to erase mistakes. 

2. Check the line you've typed against the line in the book. You can 
check the entire program again if you get an error when you RUN 
the program. 

3. Make sure you've entered statements in braces as the appropriate 
control key (see Appendix J, "How to Type in Programs"). 
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How to Type In Progfams ^ 

u 

Many of the programs in mis book contain special control characters 
(cursor control, color keys, reverse characters, and so on). To make it r~! 

easy to know exactly what to type when entering one of these pro- I — > 

grams into your computer, we have established the following listing 
conventions. 

Generally, VIC-20 program listings will contain words within 
braces which spell out any special characters: {DOWN} would mean 
to press the cursor down key. {5 SPACES} would mean to press the 
space bar five times. 

To indicate that a key should be shifted (hold down the SHIFT 
key while pressing the other key), the key would be underlined in 
our listings. For example, S would mean to type the S key while 
holding the SHIFT key. This would appear on your screen as a heart 
symbol. If you find an underlined key enclosed in braces (e.g., {10 
N}), you should type the key as many times as indicated (in our 
example, you would enter ten shifted N's). 

If a key is enclosed in special brackets, [< >], you should hold 
down the Commodore key while pressing the key inside the special 
brackets. (The Commodore key is the key in the lower left comer of 
the keyboard.) Again, if the key is preceded by a number, you 
should press the key as many times as necessary. 

Rarely, you'll see a solitary letter of the alphabet enclosed in 
braces, such as {A}. You should never have to enter such a character 
on the VIC-20, but if you do, you would have to leave the quote 
mode (press RETURN and cursor back up to the position where the 
control character should go), press CTRL-9 (RVS ON), the letter in 
braces, and then CTRL-0 (RVS OFF). 

About the quote mode: You know that you can move the cursor 
around the screen with the CRSR keys. Sometimes a programmer 
will want to move the cursor under program control. That's why you 
see all the {LEFT}'s, {HOME}'s, and {BLUJ's in our programs. The 
only way the computer can tell the difference between direct and I I 

programmed cursor control is the quote mode. 

Once you press the quote (the double quote, SHIFT-2), you are 
in the quote mode. If you type something and then try to change it f i 

by moving the cursor left, you'll only get a bunch of reverse-video ^ 

lines. These are the S5anbols for cursor left. The only editing key that 
isn't programmable is the DEL key; you can still use DEL to back up pi 

and edit the line. Once you t5rpe another quote, you are out of quote LJ 

mode. 

You also go into quote mode when you INSerT spaces into a 
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line. In any case, the easiest way to get out of quote mode is to just 
press RETURN. You'll then be out of quote mode and you can 
cursor up to the mistyped line and fix it. 

Use the following table when entering cursor and color control 
keys: 



When You 
Read: 

ICLR} 

{home} 

(UP) 

(down) 
{left} 
{right} 

{RVS} 

{off} 
{blk} 
{wht} 
{red} 
{cyn} 

{PUR} 



Press: 



See: 



SHIFT 



CLRmOME 



CLR/HOME 



SHIFT 



f CRSR A 



4 CRSR ^ 



SHIFT 



[^■CRSRH^ 



^CRSR-^ 




CTRL 9 


CTRL 




CTRL 1 




CTRL 2 


CTRL 1 3 


CTRL i 




CTRL 1 5 



When You 
Read: 

GRN} 

BLU} 

YEL} 

Fl} 

F2} 

F3) 

F4) 

F5} 

F6} 

F7} 

F8} 



t 



SHIFT 



Press 


: 




CTRL 




6 




CTRL 




7 




CTRL 




8 





SHIFT 





fl 


SHIFT 


fl 








f3 


SHIFT 1 f3 






f5 


SHIFT 


(5 




f7 



I 



See: 



n 



n 
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Screen Location Table 



Row 

7680(4096) 
7702(4118) 
7724(4140) 
7746 (4162) 
7768(4184) 
5 7790(4206) 
7812(4228) 
7834(4250) 
7856(4272) 
7878(4294) 

10 7900(4316) 
7922(4338) 
7944(4360) 
7966(4382) 
7988(4404) 

15 8010(4426) 
8032(4448) 
8054(4470) 
8076(4492) 
8098(4514) 

20 8120(4536) 
8142(4558) 

22 8164(4580) 



u 

D 
U 
U 

D 



10 



15 



20 



Column 



Note: Numbers in parentheses are for VICs with 8K or more of memory 
expansion. 
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Screen Color Memory Table 



n 

n 



Row 



38400(37888) 
38422(37910) 
38444(37932) 
38466(37954) 
38488(37976) 
5 38510(37998) 
38532(38020) 
38554(38042) 
38576(38064) 
38598(38086) 

10 38620(38108) 
38642(38130) 
38664(38152) 
38686(38174) 
38708(38196) 

15 38730(38218) 
38752(38240) 
38774(38262) 
38796(38284) 
38818(38306) 

20 38840(38328) 
38862(38350) 

22 38884(38372) 






10 



15 



20 



Column 



Note: Numbers in parentheses are for VICs with 8K or more of 
memory expansion. 



n 
n 
n 

n 
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ASCn Codes 



^SCU 


[ CHARAdtR 


ASCII 


CHARACIER 


5 


WHITE 


50 


2 


8 


DISABLE 


51 


3 




SHIFT COMMODORE 


52 


4 


9 


ENABLE 


53 


5 




SHIFT COMMODORE 


54 


6 


13 


RETURN 


55 


7 


14 


LOWERCASE 


56 


8 


17 


CURSOR DOWN 


57 


9 


18 


REVERSE VIDEO ON 


58 


\ 


19 


HOME 


59 


t 


20 


DELETE 


60 


< 


28 


RED 


61 




29 


CURSOR RIGHT 


62 


> 


30 


GREEN 


63 


7 


31 


BLUE 


64 


@ 


32 


SPACE 


65 


A 


33 


! 


66 


B 


34 


// 


67 


C 


35 


# 


68 


D 


36 


$ 


69 


E 


37 


% 


70 


F 


38 


& 


71 


G 


39 


/ 


72 


H 


40 


( 


73 


I 


41 


) 


74 


J 


42 


* 


75 


K 


43 


+ 


76 


L 


44 


/ 


77 


M 


45 


- 


78 


N 


46 


, 


79 


O 


47 


/ 


80 


P 


48 





81 


Q 


49 


1 


82 


R 
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ASCII 


CHARACriiR 


ASCII 


CHARACliiR 


83 


s 


120 


H 


84 


T 


121 


a 


85 


U 


122 


H 


86 


V 


123 


E 


87 


w 


124 


E 


88 


X 


125 


m 


89 


Y 


126 


@ 


90 


z 


127 


^ 


91 


[ 


133 


£1 


92 


£ 


134 


£3 


93 


] 


135 


£5 


94 


t 


136 


£7 


95 




137 


£2 


96 


H 


138 


£4 


97 


[* 


139 


£6 


98 


m 


140 


£8 


99 


E 


141 


SHIFIHU RETURN 


100 


I -J 

E 


142 


UPPERCASE 


101 


r 


144 


BLACK 


102 


\ 

□ 
r 


145 


CURSOR UP 


103 


146 


REVERSE VIDEO OFF 


104 


U 1 

n 


147 


CLEAR SCREEN 


105 


L--1 


148 


INSERT 


106 


[^ 


156 


PURPLE 


107 


e: 


157 


CURSOR LEFT 


108 


L 


158 


YELLOW 


109 


S 


159 


OAN 


110 


\z 


160 


SPACE 


111 


r 


161 


E 


112 


c 


162 


U 


113 


m 


163 


n 


114 


□ 


164 


D 


115 


H 


165 


D 


116 


D 


166 


m 


117 


Q 


167 


a 


118 


^ 


168 


Q 


119 


O 


169 


B 



361 



Appendix M 






ASCII 


CHARACTER 


ASCII 


CHARACIER 


170 


a 


207 


n 


171 


m 


208 




172 


a 


209 


■ 


173 


H 


210 




174 


H 


211 


"» 


175 


y 


212 


E 


176 


H 


213 


_c 


177 


H 


214 


z 


178 


H 


215 




179 


E 


216 


"* 


180 


L 


217 


2 


181 


C 


218 


T\ 


182 


3 


219 


I 


183 


" 


220 


[ 


,184 


" 


221 


[I 


185 


m 


222 


H 


186 


z 


223 


a 


187 


■. 


224 


SPACE 


188 


3 


225 


E 


189 


£J 


226 


U 


190 


E] 


227 


n 


191 


S 


228 


D 


192 




229 


D 


193 


*] 


230 


1 


194 


m 


231 


3 


195 


H 


232 


£ 


196 


3 


233 


B 


197 


3 


234 


a 


198 


B 


235 


m 


199 


D 


236 


a 


200 


a 


237 


H 


201 


3 


238 


a 


202 


3 


239 


u 


203 


□ 


240 


H 


204 


D 


241 


H 


205 


S 


242 


H 


206 


IZ 


243 


ffl 



u 
u 
u 
u 
u 
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^SCII 


CHARACTER 


244 


D 


245 


C 


246 


11 


247 


n 


248 


c 


249 


u 


250 


u 


251 


E 


252 


E 


253 




254 


E 


255 


S 



0-4, 6-7, 10-12, 15-16, 21-27, 128-132, 143, and 149-155 
have no effect. 192-223 same as 96-127;224-254 same as 
160-190; 255 same as 126. 
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Screen Codes 



u 
u 



u 

Uppercase and Lower- and Uppercase and Lower- and 

POKE Full Graphics Set Uppercase POKE Full Graphics Set Uppercase 

@ @ 31 - - 

1 A a 32 -space- 

2 B b 33 ! ,! 

3 C c 34 " 

4 D d 35 # # ' 

5 E e 36 $ $ 

6 F f 37 % % 

7 G g 38 & & 

8 H h 39 ' 

9 1 i 40 ( ( 
10 J j 41 ) ) 
UK k 42 * 

12 L 1 43 + + 

13 M m 44 , 

14 N n 45 - 

15 O o 46 . 

16 P p 47 / / 

17 Q q 48 

18 R r 49 1 1 

19 S s 50 2 2 

20 T t 51 3 3 

21 U u 52 4 4 

22 V V 53 5 5 - 

23 W w 54 6 6 U 

24 X X 55 7 7 

25 Y y 56 8 8 
Kb Z z 57 9 9 

27 [ [ 58 : 

28 £ £ 59 ; ; 

29 ] ] 60 < < 

30 f , 61 = 
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Uppercase and 


Lower- and 




Uppercase and 


Lower- and 


POKE 


Full Graphics Set 


Uppercase 


POKE 


Full Graphics Set 


Uppercase 


62 


> 


> 


95 


[1 


S 


63 


? 


? 


96 


- -space- - 


64 




H 


97 


L] 


[] 


65 


* 


A 


98 


y 


u 


66 


I 


B 


99 


n 


n 


67 


— 


C 


100 


D 


D 


68 




D 


101 


D 


D 


69 


— 


E 


102 


B 


B 


70 


~ 


F 


103 


n 


a 


71 


c 


G 


104 


s 


3 


72 


2 


H 


105 


B 


B 


73 


:^ 


I 


106 


a 


a 


74 


T 


J 


107 


CB 


I 


75 


T 


K 


108 


a 




76 


D 


L 


109 


H 


T 


77 


S 


M 


110 


H 


I 


78 





N 


111 


U 


B 


79 


n 


O 


112 


S 


X 


80 


n 


P 


113 


H 


I 


81 


■ 


Q 


114 


H 


E 


82 


D 


R 


115 


a 


E 


83 


3 


S 


116 


c 


C 


84 


n 


T 


117 


c 


c 


85 


3 


U 


118 


a 


:i 


86 


3 


V 


119 


n 






87 


D 


W 


120 


c 


■ 




88 


*] 


X 


121 


u 


~ 




89 


1 


Y 


122 


a 


- 




90 


3 


Z 


123 


E 


E 




91 


B 


ffi 


124 


eg 


1 




92 


BC 


U 


125 


EJ 






93 


m 


m 


126 


E 


(ir 




94 


H 


B 


127 


H 


B 





128-255 are reverse video of 0-127. 
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Index of Subjects by Topic 



i 1 



Location 


Description 


+ 




49280 


($C080) 


54566 
54845 
55402 


($D526) 
($D63D) 
($D86A) 


49280 


($C080) 


55379 


($D853) 


/ 
49280 


($C080) 


56082 

4 


($DB12) 


49280 


($C080) 


55848 


($DA28) 


< 




49280 


($C080) 


53270 


($D016) 


> 




49280 


($C080) 


53005 
53270 


($CFOD) 
($D016) 


49280 


($C080) 


53270 


($D016) 


It 
49280 


($C080) 


57211 


($DF7B) 


AOCBM 




40960-49151 
64831 


($AOOO-BFFF) 
($FD3F) 


64845 


($FD4D) 


ABS 




49234 
56408 


($C052) 
($DC58) 



Subject 

Math operation dispatch vector table, in token 

order 

Garbage collection 

BASIC +, concatenate string 

BASIC + (add) 

Math operation dispatch vector table, in token 

order 

BASIC - (subtract) 

Math operation dispatch vector table, in token 

order 

BASIC / divide FAC2 by FAC resulting in FAC 

Math operation dispatch vector table, in token 

order 

BASIC * multiply FAC2 by FAC, leaving the result 

in FAC 

Math operation dispatch vector table, in token 

order 

Compare numerics or strings; also used for BASIC 

<, =/> 

Math operation dispatch vector table, in token 

order 

Set up index for monadic minus 

Compare numerics or strings; also used for BASIC 

<, =, > 

Math operation dispatch vector table, in token 

order 

Compare numerics or strings; also used for BASIC 

<, =, > 

Math operation dispatch vector table, in token 

order 

BASIC It (power) 

8K RAM expansion block 4 

Check for an autostarting program at 40960 

($A000) 

AOCBM characters with the high order bit on in the 

last three 



Function dispatch vector table, in token order 
BASIC ABS 
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Accumulator 



Accumulator— see FAC and FAC2 



Alternate screens — see Multiple 


AND 




7 


($7) 


11 


($B) 


49280 


($C080) 


53225 


($CFE9) 


Array 




11 


($B) 


12 


($C) 


38-42 


($26-2A) 


45-46 


($2D-2E) 


47-48 


($2F-30) 


49-50 


($31-32) 


113-114 


($71-72) 


50782 


($C65E) 


51621 


($C9A5) 


52638 


($CD9E) 


53377 


($C081) 


53387 


($D08B) 


53479 


($D0E7) 


53533 


($D11D) 


53652 


($D194) 


53713 


($D1D1) 


53837 


($D24D) 


53857 


($D261) 


53994 


($D2EA) 


54092 


($D34C) 


54141 


($D37D) 


54566 


($D526) 
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ASC 




49234 


($C052) 


55170 


($D782) 


55179 


($D78B) 


Ascn 




56563 


($DCF3) 


56797 


($DDDD) 


60510 


($EC5E) 


60575 


($EC9F) 


60640 


($ECEO) 


60835 


($EDA3) 


ATN 




49234 


($C052) 


58123 


($E30B) 


58171 


($E33B) 


Auxiliary coloi 


r — see Color 
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Search-character for scanning BASIC statements 

BASIC buffer index/array dimensions 

Math operation dispatch vector table, in token 

order 

BASIC AND 

BASIC buffer index/array dimensions 

Flags for locate-or-build-array routines 

BASIC multiplication work area 

Pointer to the end of BASIC program, start of 

variables 

Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC arrays, start of free 

area 

Series evaluation pointer 

BASIC CLR 

BASIC LET 

Formula/expression evaluation 

BASIC DIM 

Locate or create variable 

Locate the variable 

Create new variable 

Calculate the length of an array descriptor 

Find an array item or aeate an array 

Found the array, check the subscript range 

Create an array 

Locate a particular array element 

Compute multidimension array size 

BASIC FRE 

Garbage collection 

Format of variables and floating point accumulators 

Function dispatch vector table, in token order 
Get string information 
BASIC ASC 

Converts an ASCII string to a floating point num- 
ber in FAC 

Convert FAC to TI$ or an ASCII string 
Table used for decoding unshifted keys into ASCII 
Table used for decoding SHIFTed keys into ASCII 
Table used for decoding Commodore SHIFTed keys 
into ASCII 

Table used for decoding CTRL SHIFTed keys into 
ASCII 

Function dispatch vector table, in token order 

BASIC ATN 

Table of constant values for ATN evaluation 



u 

Li 
Lj 
U 
U 



Li 

U 

u 
□ 
u 



Caitiidges 



I I 



Auxiliary register 

37146 ($911A) 

37147 ($91 IB) 
37159 ($9127) 

37162 ($912A) 

37163 ($912B) 
65017 ($FDF9) 



Background- 


-see Color 


Bitmap 
4096-4607 


($1000-11FF) 


32768-36863 
36867 


($8000-8FFF) 
($9003) 


36869 
37888-38399 


($9005) 
($9400-95FF) 


Border — see Color 


BREAK 




57-58 


($39-3A) 


170 


($AA) 


663 
790-791 


($297) 
($316-317) 



814-815 



49154 



($32E-32F) 
($C002) 



49566 


($C19E) 


50020 


($C364) 


50281 


($C469) 


51249 


($C831) 


57590 


($E0F6) 


58471 


($E467) 


60095 


($EABF) 


61605 


($F0A5) 


64850 


($FD52) 


65017 


($FDF9) 


65193 


($FEA9) 


65234 


($FED2) 


65394 


($FF72) 


Cartridges 




24576-32767 


($6000-yi^FF) 


40960-49151 


($AOOO-BFFF) 


49152 


($C000) 


64802 


($FD22) 


64831 


($FD3F) 


65193 


($FEA9) 


65532 


($FFFC) 



Shift register for parallel/serial conversion 

Auxiliary control register 

Timer 1 high order (MSB) latch byte 

Shift register for parallel/serial conveision 

Auxiliary control register 

Initialize the 6522 VIA registers 



Screen map RAM on VIC-20 with 8K or more 

expansion 

Character maps 

Number of character lines displayed, part of raster 

location 

Screen map and character map addresses 

Screen color map (8K+ expanded VIC-20) 



Line number of the BASIC statement being 
executed 

Tape: input status flags, sync countdown/RS-232 
byte assembly 
RS-232 status register 

Vector to the BREAK interrupt routine at 65234 
($FED2) 

User vector can be placed here, held over from PET 
ML monitor 

Vector to the routine to do the warm start of BASIC 
58471 ($E467) 

Table of BASIC error messages 
Miscellaneous messages 

Display ERROR or another message pointed to 
BASIC END 
BASIC patch routines 
Perform a warm start of BASIC 
IRQ handler 

RS-232: break detected on input 
Cause the RAM system vectors to be reset to pro- 
vided defaults 

Initialize the 6522 VIA registers 
NMI handler routine 
BREAK interrupt entry 
IRQ routine initial 6502 entry point 

8K RAM expansion block 3 

8K RAM expansion block 4 

Vector to the routine for the cold start of BASIC 

58232 ($E378) 

Power-on/reset routine (checks for autostart 

cartridge) 

Check for an autostarting program at 40960 

($A000) 

NMI handler routine 

6502 vector to 64802 ($FD22) 
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CM and CA2 



u 
u 



CAl and CA2 




146 


($92) 


181 


($B5) 


37136-37151 


($91 10-91 IF) 


37137 


($9111) 


37139 


($9113) 


37147 


($9113) 


37148 


($91 IC) 


37149 


($91 ID) 


37150 


($91 IE) 


37151 


($91 IF) 


37152-37167 


($9120-912F) 


37153 


($9121) 


37155 


($9123) 


37163 


($91 2B) 


37164 


($912C) 


37165 


($912D) 


37166 


($912E) 


37167 


($912F) 


51756 


($CA2C) 


61316 


($EF84) 


61325 


($EF8D) 


63732 


($F8F4) 


63886 


($F98E) 


65017 


($FDF9) 


CBl and CB2 




181 


($B5) 


37136-37151 


($9110-911F) 


37136 


($9110) 


37137 


($9111) 


37138 


($9112) 


37146 


($911 A) 


37147 


($911B) 


37148 


($91 IC) 


37149 


($91 ID) 


37150 


($911E) 


37152-37167 


($9120-912F) 


37152 


($9120) 


37162 


($912A) 


37163 


($912B) 


37164 


($912C) 


37165 


($912D) 


37166 


($91 2E) 


50231 


($C437) 


50292 


($C474) 


51998 


($CB1E) 


52159 


($CBBF) 


56781 


($DDCD) 


58528 


($E4A0) 


58537 


($E4A9) 



Tape: 0/1 bit timebase fluctuation during read 
operations 

Tape: flag for currently reading data or leader 
6522 VIA chip 1 
Port A I/O register 

Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
Interrupt flag register 
Interrupt enable register 
Mirror of port A I/O register at 37137 ($9111) 
6522 VIA chip 2 
Port A I/O register 

Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
Interrupt flag register 
Interrupt enable register 
Mirror of port A I/O register at 37153 ($9121) 
LET: assign string variable 
Serial: set clock line high 
Serial: set clock line low 
Tape: common tape read/write; start tape 
operations 

Tape: read tape data bits into location 191 ($BF) 
(IRQ driven) 
Initialize the 6522 VIA registers 

Tape: flag for currently reading data or leader 

6522 VIA chip 1 

Port B I/O register 

Port A I/O register 

Data direction register for port B 

Shift register for parallel/serial conversion 

Auxiliary control register 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

6522 VIA chip 2 

Port B I/O register 

Shift register for parallel/serial conversion 

Auxiliary control register 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

BASIC error message routine 

Display READY, message 

Part of PRINT: print a string ended by a carriage 

return 

BASIC INPUT 

Decimal number display routine 

Serial: output a 1 on the serial data line 

Serial: ou^ut a on the serial data line 



u 



u 
u 
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u 
u 
u 
u 



61347 ($EFA3) RS-232: send the next bit (NMI continuation 

routine) 

RS-232: prepare to receive the next input byte 
RS-232: open an RS-232 channel for input 
Initialize the 6522 VIA registers 
RS-232: NMI sequences 

Flag for reversed screen characters 
Pointer to which keyboard table being used of four 
possible 

Ten-byte keyboard buffer 
Current foreground color selected by color keys 
Current SHIFT keys pattern 
Flag to enable or disable combined SHIFT and 
Commodore keys 

Screen map RAM on VIC-20 with 8K-I- expansion 
Character maps 

Uppercase and graphics nonreversed screen charac- 
ter map 

Reversed uppercase and graphics saeen character 
map 

Lowercase and uppercase nonreversed screen 
character 

Reversed lowercase and uppercase screen character 
map 

Number of character lines displayed, part of raster 
location 

Raster beam location bits 8-1 
Screen map and character map addresses 
8K RAM expansion block 4 
Set keyboard decode table address in 245-246 
($F5-F6) 

Used to set uppercase/graphics character set 
Set the environment specified by graphics control 
characters 
Valid character set relocation addresses 

Screen map and character map addresses 
BASIC CHR$ 
BASIC ASC 

Saved TXTPTR of statement executing, to CONT 
on 

Get-BASIC-character routine 
BASIC RND work area, last random number or ini- 
tial seed 

Store/replace a BASIC program line 
BASIC GOTO 

Formula/expression evaluation 
Sjwtax check for a specific character in .A from 
CHRGET 
BASIC VAL 

Check whether more characters are in the current 
statement 
57870 ($E20E) Insure that a parameter is present after a delimiting 

comma 



61531 

61718 

65017 

65246 

Character 

199 

245-246 


($F05B) 
($F116) 
($FDF9) 
($FEDE) 

($C7) 
($F5-F6) 


631-640 
646 
653 
657 


($277-280) 
($286) 
($28D) 
($291) 


4096-4607 

32768-36863 

32768-33791 


($1000-1 IFF) 
($8000-8FFF) 
($8000-83FF) 


33792-34815 


($8400-87FF) 


34816-35839 


($8800-8BFF) 


35840-36863 


($8C00-8FFF) 


36867 


($9003) 


36868 
36869 

40960-49151 
60380 


($9004) 
($9005) 
($AOOO-BFFF) 
($EBDC) 


60705 
60720 


($ED21) 
($ED30) 


Appendix E 

CHR$ 

36869 

55020 

55179 

CHRGET 

61-62 


($9005) 

($D6EC) 

($D78B) 

($3D-3E) 


122-123 
139-143 


($7A-7B) 
($8B-8F) 


50332 
51360 
52638 
52991 


($C49C) 
($C8A0) 
($CD9E) 
($CEFF) 


55123 
57859 


($D7AD) 
($E203) 
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Clear to send 



58232 


($E232) 


58247 


($E387) 


58276 


($E3A4) 


Clear to send 




663 


($297) 


37136 


($9110) 


61422 


($EFEE) 


Clock — see TI, TI$, or Timer 


CLOSE 




73-74 


($49-4A) 


152 


($98) 


247-248 


($F7-F8) 


643-644 


($283-284) 


49164 


($COOC) 


57796 


($E1C4) 


57878 


($E216) 


CLR 




22 


($16) 


45-46 


($2D-2E) 



47-48 



49-50 



($2F-30) 
($31-32) 



51-52 


($33-34) 


55-56 


($37-38) 


65-66 


($41-42) 


122-123 


($7A-7B) 


247-248 


($F7-F8) 


256-511 


($100-1FF) 


601-610 


($259-262) 


643-644 


($283-284) 


49164 


($C00C) 


50782 


($C65E) 


51313 


($C871) 


57590 


($E0F6) 


57701 


($E165) 


CMD 




19 


($13) 


154 


($9A) 


37159 


($9127) 


49164 


($COOC) 


50231 


($C437) 


50844 


($C69C) 


51840 


($CA80) 


51846 


($CA86) 


52159 


($CBBF) 



Perform a cold start of BASIC 

CHRGET routine and RND seed to be copied to 

page RAM 

Initialize BASIC: restore CHRGET and page 

pointers 

RS-232 status register 

Port B I/O register 

RS-232: prepare the next byte to be sent from 

buffer 



Pointer to BASIC variable used in FOR loop 
Number of currently open files, cannot exceed ten 
RS-232: pointer to start of receiving buffer 
Pointer to the end of user RAM memory, plus one 
Keyword dispatch vector table, in token order 
BASIC CLOSE 
Handle parameters for OPEN and CLOSE 



Pointer to available slot in temporary string stack 

Pointer to the end of BASIC program, start of 

variables 

Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC arrays, start of free 

area 

Pointer to the bottom of BASIC active strings 

Pointer to the end of BASIC memory 

Pointer to the current BASIC data item 

Get-BASIC-character routine 

RS-232: pointer to start of receiving buffer 

STACK routine 

Open logical file number table (ten one-byte 

entries) 

Pointer to the end of user RAM memory, plus one 

Keyword dispatch vector table, in token order 

BASIC CLR 

BASIC RUN 

BASIC patch routines 

BASIC LOAD 

Current channel number for BASIC I/O routines 
Device number of output device 
Timer 1 high order (MSB) latch byte 
Keyword dispatch vector table, in token order 
BASIC error message routine 
BASIC LIST 
BASIC PRINT# 
BASIC CMD 
BASIC INPUT 



u 

u 
u 
u 
u 
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u 
u 
u 
u 

Li 



Commodore key 



Cold restart 

64802 


($FD22) 


1 Cold start of BASIC 

■ 49152 ($C000) 
58232 {$E378) 
58276 ($E3A4) 


58372 
58459 


($E404) 
($E45B) 


Color 

201-202 
209-210 


($C9-CA) 
($D1-D2) 


217-241 
243-244 


($D9-F1) 
($F3-F4) 


646 
647 
780-783 


($286) 
($287) 
($30C-30F) 


4096-4607 

32768-36863 

36864-37135 

36865 

36866 


($1000-11FF) 

($8000-8FFF) 

($9000-910F) 

($9001) 

($9002) 


36868 

36869 

36878 

36879 

37888-38399 

38400-38911 


($9004) 

($9005) 

($900E) 

($900F) 

($9400-95FF) 

($9600-97FF) 


58648 


($E518) 


59077 
59202 
59666 
59681 
59765 
59990 
60014 


($E6C5) 
($E742) 
($E912) 
($E921) 
($E975) 
($EA56) 
($EA6E) 


' 60045 
60065 


($EA8D) 
($EAA1) 


' 60074 
60082 


($EAAA) 
($EAB2) 


■ Color map — see Color 


■ Commodore key 



203 



($CB) 



Power-on/reset routine (checks for autostart 
cartridge) 

Vector to the routine for the cold start of BASIC 

Perform a cold start of BASIC 

Initialize BASIC: restore CHRGET and page 

pointers 

Display cold start of BASIC messages 

Copy BASIC vectors from ROM to RAM 

Cursor current logical position (line, column) 

Pointer to the start of the logical line that the 

cursor is on 

Screen line link table 

Pointer to the current physical screen lines color 

map area 

Current foreground color selected by color keys 

Cursor: original color at this screen location 

The BASIC SYS command uses this area to save 

and load 

Screen map RAM on VIC-20 with 8K+ expansion 

Character maps 

6560 VIC chip 

Bits 7-0: vertical TV picture origin 

Number of columns displayed, part of screen map 

address 

Raster beam location 

Screen map and character map addresses 

Sound volume and auxiliary color 

Background color, border color, inverse color switch 

Screen color map (8K+ expanded VIC-20) 

Screen color map (unexpanded or 3K expanded 

VIC-20) 

Initialize the 6550 VIC chip, screen, and related 

pointers 

Set up display of a character on the screen 

Handle characters going to the screen 

Set the current foreground color code 

Color code key table 

Scroll the screen 

Move screen line 

The address of the screen line and color line is set 

in memory 

Blank out a physical screen line 

Sjmchronize color to byte and store character on 

screen 

Store a character on the screen 

The address of the color map byte for screen map 

byte is found 



Matrix coordinate of current key pressed (64 if 
none) 
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Commodoie 64 



657 



($291) 



4096-4607 


($1000-1 IFF) 


32768-33791 


($8000-83FF) 


33792-34815 


($8400-87FF) 


34816-35839 


($8800-8BFF) 


35840-36863 


($8C00-8FFF) 


36869 


($9005) 


59202 


($E742) 


60510 


($EC5E) 


60575 


($EC9F) 


60640 


($ECEO) 


60777 


($ED69) 


60835 


($EDA3) 


Also see CTRL; 


Keyboard 


Commodore 64 





($0) 


1-2 


($1-2) 


512-600 


($200-258) 


631-640 


($277-280) 


645 


($285) 


663 


($297) 


673-767 


($2A1-2FF) 


784-787 


($310-313) 


60380 


($EBDC) 


60777 


($ED69) 


65111 


($FE57) 


CONT 




57-58 


($39-3A) 


59-60 


($3B-3C) 


61-62 


($3D-3E) 


49164 


($COOC) 


50844 


($C69C) 


51249 


($C831) 


51287 


($C857) 


COS 




49234 


($C052) 


57953 


($E261) 


57960 


($E268) 


58077 


($E2DD) 



Counter (VIA) — see Timer 
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Flag to enable or disable combined SHIFT and 
Commodore keys 

Screen map RAM on VIC-20 with 8K+ expansion 
Uppercase and graphics nonreversed screen charac- 
ter map 

Reversed uppercase and graphics screen character 
map 

Lowercase and uppercase nonreversed screen 
character map 

Reversed lowercase and uppercase screen character 
map 

Screen map and character map addresses 
Handle characters going to the screen 
Table used for decoding unshifted keys into ASCII 
Table used for decoding SHIFTed keys into ASCII 
Table used for decoding Commodore SHIFTed keys 
into ASCII 

Apparently unused keyboard decoding table 
Table used for decoding CTRL SHIFTed keys into 
ASCII 



6502 JMP opcode 

The USR jump vector in LSB/MSB (displacement/ 

page) form 

89-byte BASIC input buffer 

Ten-byte keyboard buffer 

Serial: timeout enable/disable flag 

RS-232 status register 

User indirect vectors or other storage area 

Four bytes of unused page 3 space for your use 

Set keyboard decode table address in 245-246 

($F5-F6) 

Apparently unused keyboard decoding table 

Reset RS-232 status, branch to 65128 ($FE68) for 

non-RS-232 status 

Line number of the BASIC statement being 

executed 

Previous BASIC line number executed 

Saved TXTPTR of statement executing, to CONT 

on 

Keyword dispatch vector table, in token order 

BASIC LIST 

BASIC END 

BASIC CONT 

Function dispatch vector table, in token order 

BASIC COS 

BASIC SIN 

Trig evaluation constant values used for COS, SIN, 

and TAN 



u 

u 
u 

u 

u 



u 
u 
u 

u 
u 



Cursor 



n 
n 

n 



CTRL 




197 


($C5) 


203 


($CB) 


212 


($D4) 


245-246 


($F5-F6) 


646 


($286) 


653 


($28D) 


657 


($291) 


32768-36863 


($8000-8t'Fl') 


37153 


($9121) 


37159 


($9127) 


37888-38399 


($9400-95FF) 


60190 


($EB1E) 


60486 


($EC46) 


60510 


($EC5E) 


60575 


($EC9F) 


60777 


($ED69) 


60835 


($EDA3) 


Cuisor 




9 


($9) 


19 


($13) 


145 


($91) 


153 


($99) 


197 


($C5) 


198 


($C6) 


200 


($C8) 


201-202 


($C9-CA) 


204 


($CC) 


205 


($CD) 


206 


($CE) 


207 


($CF) 


209-210 


($D1-D2) 


211 


($D3) 


212 


($D4) 


213 


($D5) 


214 


($D6) 


217-241 


($D9-F1) 


243-244 


($F3-F4) 


631-640 


($277-280) 


646 


($286) 


647 


($287) 


650 


($28A) 


780-783 


($30C-30F) 


4096-4607 


($1000-11FF) 


36864 


($9000) 



Matrix coordinate of last key pressed (64 if none) 

Matrix coordinate of current key pressed (64 if 

none) 

Flag to indicate if within quote marks 

Pointer to which keyboard table being used of four 

possible 

Current foreground color selecttd by color keys 

Current SHIFT keys pattern 

Flag to enable or disable combined SHIFT and 

Commodore keys 

Character maps 

Port A I/O register 

Timer 1 high order (MSB) latch byte 

Screen color map (8K+ expanded VIC-20) 

Scan the keyboard for keypresses using 6522 VIA2 

Keyboard decode table addresses 

Table used for decoding unshifted keys into ASCII 

Table used for decoding SHIFTed keys into ASCII 

Apparently unused keyboard decoding table 

Table used for decoding CTRL SHIFTed keys into 

ASCII 

Column that the cursor was on just before last TAB 

orSPC 

Current channel number for BASIC I/O routines 

Keyswitch PIA: bottom keyboard row scan 

Device number of the current input device 

Matrix coordinate of last key pressed (64 if none) 

Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Pointer to the end of line for input 

Cursor current logical position (line, column) 

Cursor blink switch: 0=flash, non-0=quiet 

Cursor countdown before blink 

Character under cursor (in screen POKE code) 

Cursor blink status; 1= reversed character, 

0=nonreversed 

Cursor position within the logical screen line 

Cursor position within the logical screen line 

Hag to indicate if within quote marks 

Current screen line logical length (21,43,65,87) 

Cursor: current physical screen line cursor is on (0- 

22) 

Screen line link table 

Pointer to the current physical screen lines color 

map area 

Ten-byte keyboard buffer 

Current foreground color selected by color keys 

Cursor: original color at this screen location 

Keyboard repeater flags 

The BASIC SYS command uses this area to save 

and load 

Screen map RAM on VIC-20 with 8K-I- expansion 

Left edge of TV picture and interlace switch 
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Custom characters 



u 
u 



36865 


($9001) 


36866 


($9002) 


37153 


($9121) 


37159 


($9127) 


37888-38399 


($9400-95FF) 


50844 


($C69C) 


51960 


($CAF8) 


52027 


($CB3B) 


52091 


($CB7B) 


52159 


($CBBF) 


54174 


($D39E) 


58634 


($E50A) 


58648 


($E518) 


58753 


($E581) 


58853 


($E5E5) 


59077 


($E6C5) 


59114 


($E6EA) 


59181 


($E72D) 


59202 


($E742) 


59587 


($E8C3) 


59608 


($E8D8) 


59624 


($E8E8) 


59642 


($E8FA) 


59765 


($E975) 


60065 


($EAA1) 


60095 


($EABF) 


65520 


($FFF0) 


Custom Characters — see Chara 


DATA 




15 


($F) 


17 


($11) 


43-44 


($2B-2C) 


57-58 


($39-3A) 


63-64 


($3F-40) 


65-66 


($43-44) 


631-640 


($277-280) 


4096-4607 


($1000-1 IFF) 


32768-36863 


($8000-8FFF) 


49164 


($COOC) 


51229 


($C81D) 


51448 


($C8F8) 


52230 


($CC06) 


54566 


($D526) 


DEF 




49164 


($COOC) 



Bits 7-0: vertical TV picture origin 

Number of columns displayed, part of screen map 

address 

Port A I/O register 

Timer 1 high order (MSB) latch byte 

Screen color map (8K+ expanded VIC-20) 

BASIC LIST 

BASIC TAB, BASIC SPC 

Part of PRINT: print format characters of space, 

cursor right 

BASIC GET 

BASIC INPUT 

BASIC POS 

Read or set the current cursor column and line 

Initialize the 6550 VIC chip, screen, and related 

pointers 

Move the cursor to the screen home position 

Wait for character to appear in the keyboard buffer 

Set up display of a character on the screen 

Advance the cursor on the screen, add lines, and 

scroll 

Back up cursor into the previous logical screen line 

Handle characters going to the screen 

Advance the cursor to the next logical screen line 

Handle the carriage return key 

Move the cursor to the end of the previous screen 

line 

Move the cursor to the start of the next screen line 

Scroll the screen 

Synchronize color to byte and store character on 

screen 

IRQ handler 

JuMP to 58634 ($E50A) 



Flag byte: LIST quote/collect done/tokenize 

character 

Indicate which of READ, INPUT, or GET is active 

Pointer to the start of the tokenized BASIC 

program 

Line number of the BASIC statement being 

executed 

Current DATA line number in LSB/MSB form 

Pointer to source of INPUT, GET, and READ 

information 

Ten-byte keyboard buffer 

Screen map RAM on VIC-20 with 8K-I- expansion 

Character maps 

Keyword dispatch vector table, in token order 

BASIC RESTORE 

BASIC DATA 

BASIC READ 

Garbage collection 

Kejrword dispatch vector table, in token order 



u 
u 
u 
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U 

u 

u 
u 



54195 


($D3B3) 


54241 


($D3E1) 


54260 


($D3F4) 


54351 


($D44F) 



Device number 

19 ($13) 

43-44 ($2B-2C) 



n 



73-74 


($49-4A) 


152 


($98) 


153 


($99) 


154 


($9A) 


184 


($B8) 


186 


($BA) 


611-620 


($263-26C) 


631-640 


($277-280) 


659 


($293) 


828-1019 


($33C-3FB) 


828 


($33C) 


37137 


($9111) 


49310 


($C09E) 


50844 


($C69C) 


57701 


($E165) 


57809 


($E1D1) 


57878 


($E216) 


58811 


($E5BB) 


60948 


($EE14) 


60951 


($EE17) 


62151 


($F3C7) 


62217 


($F309) 


62282 


($F34A) 


62431 


($F3DF) 


62474 


($F40A) 


62786 


($F542) 


63093 


($F675) 


65104 


($FE50) 


65111 


($FE57) 


65130 


($FE6A) 


65493 


($FFU5) 


65496 


($FFL)8) 


Appendix D 




DIM 




11 


($B) 


12 


(SO 


49164 


($COOC) 


53377 


($D081) 


53837 


($D24D) 


Dipole — see 


Tape 



Dipole 



BASIC DEF 

Check DEF FN and FN syntax 

BASIC FN 

Store DEF FN values into the function descriptor 

from stack 

Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Pointer to BASIC variable used in FOR loop 

Number of currently open files, cannot exceed ten 

Device number of the current input device 

Device number of output device 

Current logical file number being used 

Cunent device number being used 

Open device number table (ten one-byte entries) 

Ten-byte keyboard buffer 

RS-232 pseudo-6551 control register 

Tape buffer area, 192 bytes, for headers and BASIC 

program device 

Tape header identifier byte (1-5) 

Port A I/O register 

BASIC keyword table in token number order 

BASIC LIST 

BASIC LOAD 

Set LOAD, VERIFY, and SAVE parameters 

Handle parameters for OPEN and CLOSE 

Reset the default device numbers 

Serial: send talk with attention 

Serial: send listen v»dth attention 

Open .X file number channel for input 

Open .X file number channel for output 

Close logical file number in .A 

Set file characteristics of file (.X) into 184-186 

($B8-BA) 

Open a logical file, file number in 184 ($B8) 

LOAD (or VERIFY) to RAM from device number 

specified in 186 ($BA) 

Save RAM to device number specified in 186 ($BA) 

Set the current file number, device, and secondary 

address 

Reset RS-232 status, branch to 65128 ($FE68) for 

non-RS-232 stahis 

OR .A with the contents of 144 ($90) ST and store 

there 

JuMP to 62786 ($F542) 

JuMP to 63093 ($F675) 

Device, secondary address, status chart 

BASIC buffer index/array dimensions 
Flags for locate-or-build-array routines 
Keyword dispatch vector table, in token order 
BASIC DIM 
Check for redimensioning of an array 
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Double-sizeii characters 



u 



Disk 




19 


($13) 


43-44 


($2B-2C) 


153 


($99) 


174-175 


($AE-AF) 


183 


($B7) 


184 


($B8) 


185 


($39) 


186 


($BA) 


187-188 


($BB-BC) 


193-194 


($C1-C2) 


631-640 


($277-280) 


32768-36863 


($8000-8FFF) 


37146 


($911 A) 


37162 


($912A) 


52091 


($CB7B) 


57701 


($E165) 


57796 


($E1C4) 


62812 


($F55C) 


63122 


($F692) 


Appendix D 




/4/so see Serial 




Double-sized characters — see ( 


Dynamic keyboard 


198 


($C6) 


631-640 


($277-280) 


END 




57-58 


($39-3A) 


59-60 


($3B-3C) 


61-62 


($3D-3E) 


49164 


($COOC) 


50020 


($C364) 


51247 


($C82F) 


51249 


($C831) 


51287 


($C857) 


Error messages 


, BASIC 


49566 


($C19E) 


49960 


($C328) 


Also see Message 


EXP 




49234 


($C052) 


57279 


($DFBF) 


57325 


($DFED) 


Expansion 




0-143 


($0-8F) 


43-44 


($2B-2C) 



Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Device number of the current input device 

Tape: ending address for LOAD, SAVE, and 

VERIFY 

Number of characters in filename (0-187 or 0-16) 

Current logical file number being used 

Current secondary address being used (also called 

command) 

Current device number being used 

Pointer to the current filename 

Tape/Serial: pointer to the start of the I/O area 

Ten-byte keyboard buffer 

Character maps 

Shift register for parallel/serial conversion 

Shift register for parallel/serial conversion 

BASIC GET 

BASIC LOAD 

BASIC CLOSE 

Load or verify RAM from a serial device 

Save RAM to serial device 

Device, secondary address, status chart 



Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Ten-b5rte keyboard buffer 

Line number of the BASIC statement being 

executed 

Previous BASIC line number executed 

Saved TXTPTR of statement executing, to CONT 

on 

Keyword dispatch vector table, in token order 

Miscellaneous messages 

BASIC STOP 

BASIC END 

BASIC CONT 



Table of BASIC error messages 
BASIC error message table vectors 



Function dispatch vector table, in token order 
Tables for LOG and EXP, in floating point format 
BASIC EXP 

Page working storage for BASIC 
Pointer to the start of the tokenized BASIC 
program 



u 
u 

LJ 



378 



U 
U 

u 
u 
u 



i i 

n 
n 
n 

n 



45-46 



47-48 



($2D-2E) 
($2F-30) 



55-56 


($37-48) 


631-640 


($277-280) 


641-642 


($281-282) 


643-644 


($283-284) 


645 


($285) 


1024-4095 


($400-FFl') 


4096-4607 


($1 000-11 FF) 


4096-7679 


($1000-1DFF) 


7680-8191 


($1E00-1FFF) 


7680-8191 


($1E00-1FFF) 


8192-16383 


($2000-3FFF) 


16384-24575 


($4000-5FFF) 


24576-32767 


($6000-7FFF) 


36869 


($9005) 


36880-37135 


($9010-910F) 


37148 


($911C) 


37164 


($912C) 


37888-38399 


($9400-95FF) 


40960-49151 


($A000-BFFF) 


Appendix E 




Appendix E 




FAC 




97-102 


($61-66) 


103 


($67) 


104 


($68) 


105-110 


($69-6E) 


111 


($6F) 


112 


($70) 


51496 


($C928) 


51531 


($C94B) 


51621 


($C9A5) 


52638 


($CD9E) 


52948 


($CED4) 


53005 


($CFOD) 


53032 


($CF28) 


53159 


($CFA7) 


53225 


($CFE9) 


53270 


($D016) 


53294 


($D02E) 


54260 


($D3F4) 


54373 


($D465) 


54389 


($D475) 


55287 


($D7F7) 


55341 


($D82D) 


55376 


($D850) 


55379 


($D867) 


55399 


($D867) 


55402 


($D86A) 



nic 



Pointer to the end of BASIC program, start of 

variables 

Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC memory 

Ten-byte keyboard buffer 

Pointer to the start of user RAM memory 

Pointer to the end of user RAM memory, plus one 

Serial: timeout enable/disable flag 

3072 bytes of expansion RAM area 

Screen map RAM on VIC-20 with 8K+ expansion 

Continuation of RAM for the BASIC program on a 

3K expanded VIC 

Screen map RAM on VIC-20 with less than 8K 

expansion expanded VIC-20 

Screen map RAM on VIC-20 with only 3K 

&(pansion 

8K RAM expansion block 1 

8K RAM expansion block 2 

8K RAM expansion block 3 

Screen map and character map addresses 

Future expansion RAM/ROM space 

Peripheral control register for handshaking 

Peripheral control register for handshaking 

Screen color map (8K-I- expanded VIC-20) 

8K RAM expansion block 4 

Expansion effect on pointers 

Statement to determine the expansion environment 

BASIC Floating Point Accumulator 1 

BASIC series evaluation number of items 

High order FAC propagation word (overflow) 

BASIC Floating Point Accumulator 2 

FAC to FAC2 sign comparison 

Low order of FAC mantissa for rounding 

BASIC IF 

BASIC ON 

BASIC LET 

Formula/expression evaluation 

BASIC NOT 

Set up index for monadic minus 

Obtain variable name and type 

Invoke function 

BASIC AND 

Compare numerics or strings 

Compare strings 

BASIC FN 

BASIC STR$ 

Calculate new string length and vector 

Convert floating point FAC to two-byte positive 

integer 

BASIC WAIT 

Subtract memory contents from FAC 

BASIC - (subtract) 

Add memory contents to FAC 

BASIC + (add) 

379 



I 1, 



FAC2 



55463 


($D8A7) 


55543 


($D8F7) 


55550 


($D8FE) 


55623 


($D947) 


55786 


($D9EA) 


55848 


($DA28) 


55948 


($DA8C) 


55991 


($DAB7) 


56034 


($DAE2) 


56062 


{$DAFE) 


56079 


($DBOF) 


56082 


($DB12) 


56226 


($DBA2) 


56263 


($DBC7) 


56266 


($DBCA) 


56272 


($DBDO) 


56276 


($DBD4) 


56316 


($DBFC) 


56332 


($DCOC) 


56335 


($DCOF) 


56347 


($DC1B) 


56363 


($DC2B) 


56380 


($DC3C) 


56388 


($DC44) 


56408 


($DC58) 


56411 


($DC5B) 


56475 


($DC9B) 


56524 


($DCCC) 


56563 


($DCF3) 


56702 


($DD7E) 


56781 


($DDCD) 


56797 


($DDDD) 


57201 


($DF71) 


57211 


($FD7B) 


57268 


($DFB4) 


57325 


($DFED) 


57430 


($E056) 


57639 


($E127) 


57953 


($E261) 


57960 


($E268) 


58033 


($E2B1) 


58123 


($E30B) 


Appendix B 




FAC2— see FAC 




File number 




19 


($13) 


73-74 


($49-4A) 


152 


($98) 


153 


($99) 


154 


($9A) 


184 


($B8) 


185 


($B9) 



Make the result negative if a borrow was done 

Zero out FAC and make sign positive since result 

was zero 

Renormalize the FAC result 

Complement FAC entirely 

BASIC LOG 

BASIC * (multiply FAC2 by FAC, leaving the result 

in FAC) 

Move floating point memory locations to FAC2 

Add exponents of FAC and FAC2 

Multiply FAC by 10 

Divide FAC by 10 

Move floating point in memory to FAC2 

BASIC / (divide FAC2 by FAC resulting in FAC) 

Move floating point memory into FAC 

Move FAC to memory 

Move FAC to memory 

Move FAC to memory 

Perform move of FAC to memory 

Transfer FAC2 to FAC 

Move FAC to FAC2, with rounding 

Move FAC to FAC2, without rounding 

Round FAC by adjusting the rounding byte 

Test the sign of FAC 

Convert the sign obtained above to or — 1 in FAC 

Convert a two-byte integer to floating point in FAC 

BASIC ABS 

Compare FAC to memory 

Convert FAC floating point to signed integer 

BASIC INT 

Convert an ASCII string to a floating point number 

in FAC 

Add .A to FAC 

Decimal number display routine 

Convert FAC to TI$ or an ASCII string 

BASIC SQR 

BASIC t (power) 

Monadic minus 

BASIC EXP 

Math series evaluation routine 

BASIC SYS 

BASIC COS 

BASIC SIN 

BASIC TAN 

BASIC ATN 

Format of variables and floating point accumulators 



Current channel number for BASIC I/O routines 
Pointer to BASIC variable used in FOR loop 
Number of cvurently open files, cannot exceed ten 
Device number of the current input device 
Device number of output device 
Current logical file number being used 
Current secondary address being used (also called 
command) 



U 
U 

u 
u 

u 



380 



u 

iJ 
u 
u 
u 



FRE 



n 
n 



601-610 


($259-262) 


Open logical file number table (ten one-byte 
entries) 


659 


($293) 


RS-232 pseudo-6551 control register 


51846 


($CA86) 


BASIC CMD 


52091 


($CB7B) 


BASIC GET 


57878 


($E216) 


Handle parameters for OPEN and CLOSE 


62151 


($F2C7) 


Open .X file number channel for input 


62217 


($F309) 


Open .X file number channel for output 


62282 


($F34A) 


Close logical file number in .A 


62415 


($F3CF) 


Find file number (.X) in file table at 601 ($259) 


62431 


($F3DF) 


Set file characteristics of file (.X) into 184-186 
($B8-BA) 


62474 


($F40A) 


Open a logical file, file number in 184 ($B8) 


65104 


($FE50) 


Set the current file number, device, and secondary 
address 


65466 


($FFBA) 


JuMP to 65104 ($FE50) 


Fire button 






37136-37151 


($9110-911F) 


6522 VIA chip 1 


37137 

FN 

70 


($9111) 


Port A I/O register 


($10) 


Subscript or FN x flag byte 


71-72 


($47-48) 


Pointer to the descriptor of the current BASIC 
variable 


78-79 


($4E-4D) 


Pointer to current FN descriptor (in variable 
storage) 


49164 


($COOC) 


Keyword dispatch vector table, in token order 


49310 


($C09E) 


BASIC keyword table in token number order 


52909 


($CEAD) 


Factoring is continued 


53387 


($D08B) 


Locate or create variable 


54190 


($D3AE) 


Issue an UNDEF'D FUNCTION message for 
EVALFN ($D3F4) 


54195 


($D3B3) 


BASIC DEF 


54241 


($D3E1) 


Check DEF FN and FN syntax 


54260 


($D3F4) 


BASIC FN 


54351 


($D44F) 


Store DEF FN values into the function descriptor 
from stack 


FOR 






47-48 


($2F-30) 


Pointer to the end of BASIC variables, start of 
arrays 


57-58 


($39-3A) 


Line number of the BASIC statement being 
executed 


73-74 


($49-4A) 


Pointer to BASIC variable used in FOR loop 


256-511 


($100-1FF) 


STACK routine 


631-640 


($277-280) 


Ten-byte keyboard buffer 


49164 


($C00C) 


Keyword dispatch vector table, in token order 


50058 


($C38A) 


Find FOR and GOSUB entries on the stack 


50171 


($C3FB) 


Check stack requested space available 


51010 


($C742) 


BASIC FOR 


51410 


($C8D2) 


BASIC RETURN 


52510 


($CD1E) 


BASIC NEXT 


55740 


($D9BC) 


Constant to zero a floating point accumulator 


Foreground— 


see Color 




FRE 






49-50 


($31-32) 


Pointer to the end of BASIC arrays of free area 


51-52 


($33-34) 


Pointer to the bottom of BASIC active strings 



381 



Game port 



49234 


($C052) 


54141 


($D37D) 


Game port 




36864-37135 


($9000-910F) 


36864 


($9000) 


36865 


($9001) 


36868 


($9004) 


36870 


($9006) 


36871 


($9007) 


36872 


($9008) 


37136-37151 


($91 10-91 IF) 


37136 


($9110) 


37137 


($9111) 


37152-37167 


($9120-912F) 


37152 


($9120) 


37154 


($9122) 


Garbage collection 


15 


($F) 


22 


($16) 


49-50 


($31-32) 


51-52 


($33-34) 


78-79 


($4E-4D) 


83 


($43) 


84-86 


($54-56) 


87-96 


($57-60) 


50104 


($C3B8) 


50111 


($C3BF) 


50184 


($C408) 


54141 


($D37D) 


54566 


($D526) 


GET 




17 


($11) 


19 


($13) 


67-68 


($43-44) 


73-74 


($49-4A) 


75-76 


($4B-4C) 


113-114 


($71-72) 


145 


($91) 


198 


($C6) 


201-202 


($C9-CA) 


512-600 


($200-258) 


631-640 


($277-280) 


37153 


($9121) 


49164 


($C00C) 


52045 


($CB4D) 


52901 


($CB7B) 


52230 


($CC06) 



Function dispatch vector table, in token order 
BASIC FRE 



6560 VIC chip 

Left edge of TV picture and interlace switch 

Bits 7-0: vertical TV picture origin 

Raster beam location 

Light pen horizontal screen location 

Light pen vertical screen location 

Potentiometer X/Paddle X value 255 

6522 VIA chip 1 

Port B I/O register 

Port A I/O register 

6522 VIA chip 2 

Port B I/O register 

Data direction register for port B 

Flag byte: LIST quote/collect done/tokenize 

character 

Pointer to available slot in temporary string stack 

Pointer to the end of BASIC arrays, start of free 

area 

Pointer to the bottom of BASIC active strings 

Pointer to current FN descriptor (in variable 

storage) 

Constant for garbage collection (3 or 7) 

Jump opcode and vector to function routine 

BASIC numeric work area 

Open space in memory for a new BASIC line or 

variable 

Move a block of memory 

Check that requested space in dynamic area is 

available 

BASIC FRE 

Garbage collection 

Indicate which of READ, INPUT, or GET is active 

Current channel number for BASIC I/O routines 

Pointer to source of INPUT, GET, and READ 

information 

Pointer to BASIC variable used in FOR loop 

Math operator displacement/INPUT TXTPTR 

Series evaluation pointer 

Keyswitch PIA: bottom keyboard row scan 

Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Cursor current logical position (line, column) 

89-byte BASIC input buffer 

Ten-byte keyboard buffer 

Port A I/O register 

Kejfword dispatch vector table, in token order 

Error message formatting routine for GET, INPUT, 

and READ 

BASIC GET 

BASIC READ, also common routines for GET and 

INPUT 



u 
u 
u 
u 
u 



382 



U 

u 
u 
u 

u 



i i 

n 
n 
n 
n 



n 
n 
n 
n 



61941 

GET* 
19 
153 
828-1019 

829-1019 

52091 

62063 

GOSUB 

20-21 

43-44 

57-58 

73-74 

256-511 

780-783 

49164 

49234 

50058 

50707 

51331 

51410 

51531 

GOTO 

20-21 

43-44 

57-58 

49164 
49280 

49310 
50707 
51172 
51331 
51360 
51496 
51531 
51563 



($F1F5) 



($13) 
($99) 
($33C-3FB) 

{$33D-3FB) 

($CB7B) 
($F26F) 

($14-15) 
($2B-2C) 

($39-3A) 

($49-4A) 

($100-1FF) 

($30C-30F) 

($COOC) 
($C052) 
($C38A) 
($C613) 
($C883) 
($C8D2) 
($C94B) 

($14-15) 
($2B-2C) 

($39-3A) 

($COOC) 
($C080) 

($C09E) 
($C613) 
($C7E4) 
($C883) 
($C8A0) 
($C928) 
($C94B) 
($C96B) 



GO TO— see GOTO 



I.D. — see Tape 

IF 

49164 

51496 

51515 

INPUT 

17 



($COOC) 
($C928) 
($C93B) 

($11) 



INPUT 



Routing routine for obtaining a character of input 
data 



Current channel number for BASIC I/O routines 

Device number of the current input device 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Tape block of 191 user data bytes from a BASIC 

program 

BASIC GET 

Obtain a byte from the RS-232 device 

Line number integer in two-byte LSB/MSB format 

Pointer to the start of the tokenized BASIC 

program 

Line number of the BASIC statement being 

executed 

Pointer to BASIC variable used in FOR loop 

STACK 

The BASIC SYS command uses this area to save 

and load 

Keyword dispatch vector table, in token order 

Function dispatch vector table, in token order 

Find FOR and GOSUB entries on the stack 

Find the BASIC line from its line number 

BASIC GOSUB 

BASIC RETURN 

BASIC ON 

Line number integer in two-byte LSB/MSB format 

Pointer to the start of the tokenized BASIC 

program 

Line number of the BASIC statement being 

executed 

Keyword dispatch vector table, in token order 

Math operation dispatch vector table, in token 

order 

BASIC keyword table in token nvunber order 

Find the BASIC line from its line number 

Execute the current BASIC statement 

BASIC GOSUB 

BASIC GOTO 

BASIC IF 

BASIC ON 

Convert decimal line number to LSB/MSB format 



Kejrword dispatch vector table, in token order 
BASIC IF 
BASIC REM 

Indicate which of READ, INPUT, or GET is active 

383 



INPUT'' 



19 
67-68 

73-74 
75-76 
113-114 
198 

201-202 

512-600 

631-640 

49164 

50231 

50528 

52027 

52045 



($13) 
($43-44) 

($49-4A) 
($4B-4C) 
($71-72) 
($C6) 

($C9-CA) 

($200-258) 

($277-280) 

($C00C) 

($C437) 

($C560) 

($CB3B) 

($CB4D) 



52091 


($CB7B) 


52159 


($CBBF) 


52230 


($CC06) 


52476 


($CCFC) 


54407 


($D487) 


58959 


($E64F) 


61941 


($F1F5) 


INPUT# 




19 


($13) 


153 


($99) 


828-1019 


($33C-3FB) 


829-1019 


($33D-3FB) 


49164 


($COOC) 


50528 


($C560) 


52133 


($CBA5) 


58853 


($E5E5) 


INST 




212 


($D4) 


216 


($D8) 


59077 


($E6C5) 


INT 




49234 


($C052) 


56524 


($DCCC) 


Interlace 




36864 


($9000) 


Interrupt 




Also see IRQ and NMI 


146 


($92) 


192 


($C0) 


197 


($C5) 



Current channel number for BASIC I/O routines 

Pointer to source of INPUT, GET, and READ 

information 

Pointer to BASIC variable used in FOR loop 

Math operator displacement/INPUT TXTPTR 

Series evaluation pointer 

Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Cursor current logical position (line, column) 

89-byte BASIC input buffer 

Ten-byte keyboard buffer 

Keyword dispatch vector table, in token order 

BASIC error message routine 

Receive input from device and fill the BASIC text 

buffer 

Part of PRINT: print format characters of space,, 

cursor right 

Error message formatting routine for GET, INPUT, 

and READ 

BASIC GET 

BASIC INPUT 

BASIC READ, also common routines for GET and 

INPUT 

INPUT error messages 

Scan and set up string 

Obtain INPUT from screen 

Routing routine for obtaining a character of input 

data 

Current channel number for BASIC I/O routines 

Device number of the current input device 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Tape block of 191 user data bytes from a BASIC 

program 

Keyvfotd dispatch vector table, in token order 

Receive input from device and fill the BASIC text 

buffer 

BASIC INPUT* 

Wait for character to appear in the keyboard buffer 

Flag to indicate if within quote marks 
Number of outstanding inserts remaining 
Set up display of a character on the screen 

Function dispatch vector table, in token order 
BASIC INT 

Left edge of TV picture and interlace switch 



Tape: 0/1 bit timebase fluctuation during read 

operations 

Tape: motor interlock switch 

Matrix coordinate of last key pressed (64 if none) 



u 
u 
u 
u 
u 



384 



u 
u 
u 
u 
u 



n 






205 


($CD) 




256-511 


($100-1FF) 




631-640 


($277-280) 


"■ 


647 


($287) 


652 


($28C) 




788-789 


($314-315) 


p 


790-791 


($316-317) 


792-793 


($318-319) 




814-815 


($32E-32F) 




34816-35839 


($8800-8BFF) 




36868 


($9004) 




37136-37151 


($91 10-91 IF) 




37140 


($9114) 




37141 


($9115) 




37143 


($9117) 




37144 


($9118) 




37145 


($9119) 




37146 


($911 A) 




37147 


($91 IB) 




37148 


($91 IC) 




37149 


($91 ID) 




37150 


($911E) 




37152-37167 


($9120-912F) 




37153 


($9121) 




37156 


($9124) 




37157 


($9125) 




37158 


($9126) 




37159 


($9127) 




37160 


($9128) 




37161 


($9129) 




37162 


($912A) 




37163 


($912B) 




37164 


($912C) 




37165 


($912D) 




37166 


($912E) 




40960-49151 


($A000-BFFF) 




51287 


($C857) 




52091 


($CB7B) 




60095 


($EABF) 




60951 


($EE17) 


1 


61347 


($EFA3) 


61494 


($F036) 




61531 


($F05B) 


r-' 


61677 


($F0ED) 


I ! 


61698 


($F102) 




61718 


($F116) 




63689 


($F8C9) 


n 


63715 


($F8E3) 


63732 


($F8F4) 




63837 


($F95D) 


1 


63886 


($F98E) 



Interrupt 



Cursor countdown before blink 

STACK 

Ten-byte keyboard buffer 

Cursor: original color at this screen location 

Delay before first repeat of key 

Vector to the routine IRQ at 60095 ($EABF) 

Vector to the interrupt routine BREAK* at 65234 

($FED2) 

Vector to the routine NMI* at 65197 ($FEAD) 

User vector can be placed here; held over from PET 

ML monitor 

Lowercase and uppercase nonreversed screen 

character map 

Raster beam location 

6522 VIA chip 1 

Timer 1 least significant byte (LSB) of count 

Timer 1 most significant byte (MSB) of count 

Timer 1 high order (MSB) latch byte 

Timer 2 low order (LSB) counter and LSB latch 

Timer 2 high order (MSB) counter and MSB latch 

Shift register for parallel/serial conversion 

Auxiliary control register 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

6522 VIA chip 2 

Port A I/O register 

Timer 1 least significant byte (LSB) of count 

Timer 1 most significant byte (MSB) of count 

Timer 1 low (LSB) latch byte 

Timer 1 high order (MSB) latch byte 

Timer 2 low order (LSB) counter and LSB latch 

Timer 2 high order (MSB) counter and MSB latch 

Shift register for parallel/serial conversion 

Auxiliary control register 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

8K RAM expansion block 4 

BASIC CONT 

BASIC GET 

IRQ handler 

Serial: send listen with attention 

RS-232: send the next bit (NMI continuation 

routine) 

RS-232: receive an input bit (NMI driven) 

RS-232: prepare to receive the next input byte 

RS-232: store a character in the transmit buffer 

RS-232: set up NMI interrupts for transmission 

RS-232: open an RS-232 channel for input 

Tape: read blocks from tape 

Tape: write blocks to tape 

Tape: common tape read/vrate; start tape 

operations 

Tape: set time limit for tape dipole 

Tape: read tape data bits into location 191 ($BF) 

(IRQ driven) 

385 



Inverse colof 



64518 


($FC06) 


64523 


($FCOB) 


64680 


($FCA8) 


64802 


($FD22) 


65017 


($FDF9) 


65193 


($FEA9) 


65234 


($FED2) 


65246 


($FEDE) 


65366 


($FFb6) 


65394 


($FF72) 


65530 


($FFFA) 


65534 


($FFFE) 


Inverse color- 


-see Screen 


IRQ 




19 


($13) 


192 


($C0) 


197 


($C5) 


205 


($CD) 


256-511 


($100-1FF) 


631-640 


($277-280) 


647 


($287) 


652 


($28C) 


671-672 


($29F-2A0) 


788-789 


($314-315) 


790-791 


($316-317) 


792-793 


($318-319) 


37136-37151 


($91 10-91 IF) 


37145 


($9119) 


37148 


($91 IC) 


37149 


($91 ID) 


37150 


($91 IE) 


37152-37167 


($9120-912F) 


37153 


($9121) 


37156 


($9124) 


37157 


($9125) 


37158 


($9126) 


37159 


($9127) 


37161 


($9129) 


37165 


($91 2D) 


37166 


($912E) 


52091 


($CB7B) 


60095 


($EABF) 


63284 


($F734) 


63689 


($F8C9) 


63715 


($F8E3) 


63732 


($F8F4) 


63819 


($F94B) 


63837 


($F95D) 


63886 


($F98E) 



Tape: end of block write processing 

Tape: data write (IRQ driven) 

Tape: leader write (IRQ driven) 

Power-on/reset routine (checks for autostart 

cartridge) 

Initialize the 6522 VIA registers 

NMI handler routine 

BREAK interrupt entry 

RS-232: NMI sequences 

Restore 6502 registers from the stack and return 

from interrupt 

IRQ routine initial 6502 entry point 

6502 vector to 65193 ($FEA9) 

6502 vector to 65394 ($FF72) 



Current channel number for BASIC I/O routines 

Tape: motor interlock switch 

Matrix coordinate of last key pressed (64 if none) 

Cursor countdown before blink 

STACK 

Ten-byte keyboard buffer 

Cursor: original color at this screen location 

Delay before first repeat of key 

Temporary save area for the normal IRQ vector 

during tape I/O 

Vector to the routine IRQ at 60095 ($EABF) 

Vector to the routine BREAK* at 65234 ($FED2) 

Vector to the routine NMI* at 65197 ($FEAD) 

6522 VIA chip 1 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

6522 VIA chip 2 

Port A I/O register 

Timer 1 least significant byte (LSB) of count 

Timer 1 most significant byte (MSB) of count 

Timer 1 low (LSB) latch byte 

Timer 1 high order (MSB) latch byte 

Timer 2 high order (MSB) counter and MSB latch 

Interrupt flag register 

Interrupt enable register 

BASIC GET 

IRQ handler 

Increment the jiffy clock at 160-162 ($A0-A2) 

Tape: read blocks from tape 

Tape: write blocks to tape 

Tape: common tape read/write; start tape 

operations 

Tape: check for the RUN/STOP key 

Tape: set time limit for tape dipole 

Tape: read tape data bits into location 191 ($BF) 

(IRQ driven) 



u 
u 
u 
u 
u 
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u 
u 
u 
u 

Li 



n 

n 



luMP to 



64173 



($FAAD) 



n 

n 



n 
n 

n 

n 



64523 


($FCOB) 


64661 


($FC95) 


64680 


($FCA8) 


64719 


($FCCF) 


64758 


($FCF6) 


65009 


($FDF1) 


65193 


($FEA9) 


65394 


($FF72) 


65534 


($FFFE) 


Joy — see Game 


port 


Jiffy 




145 


($91) 


160-162 


($A0-A2) 


651 


($28B) 


652 


($28C) 


788-789 


($314-315) 


790-791 


($316-317) 


37152-37167 


($9120-912F) 


37157 


($9125) 


37159 


($9127) 


60095 


($EABF) 


63284 


($F734) 


63328 


($F760) 



63335 



63732 



($F767) 
($F8F4) 



65193 


($FEA9) 


65499 


($FFUB) 


65502 


($FFDE) 


65514 


($FFliA) 


Jitters — see 


Interlace 


Jump to 




64850 


($FD52) 


64855 


($FD57) 


65418 


($FF8A) 


65421 


($FF8D) 


65424 


($FF90) 


65427 


($FF93) 


65430 


($FF96) 


65433 


($FF99) 


65436 


($FF9C) 


65439 


($FF9F) 


65442 


($FFA2) 


65445 


($FFA5) 


65448 


($FFA8) 


65451 


($FFAB) 


65454 


($FFAE) 


65457 


($FFB1) 



Tape: determine if to store the input character from 

tape 

Tape: data write (IRQ driven) 

Tape: block leader write (IRQ driven) 

Tape: leader write (IRQ driven) 

Tape: restore IRQ vector 

Tape: reset the current IRQ vector 

IRQ vectors table 

NMI handler routine 

IRQ routine initial 6502 entry point 

6502 vector to 65394 



Keyswitch PIA: bottom keyboard row scan 

Jiffy clock, realtime clock 

Delay before other than first repeat of key 

Delay before first repeat of key 

Vector to the routine IRQ at 60095 ($EABF) 

Vector to the routine BREAK* at 65234 ($FED2) 

6522 VIA chip 2 

Timer 1 most significant byte (MSB) of count 

Timer 1 high order (MSB) latch byte 

IRQ handler 

Increment the jiffy clock at 160-162 ($A0-A2) 

Put jiffy clock from 160-162 ($A0-A2) into .Y, .X, 

and .A 

Set time into jiffy clock 160-162 ($A0-A2) from .Y, 

.X, and .A 

Tape: common tape read/write; start tape 

operations 

NMI handler routine 

JuMP to 63335 ($F767) 

JuMP to 63328 ($F760) 

JuMP to 63284 ($F734) 



Cause the RAM system vectors to be reset to pro- 
vided defaults 

Read or set system RAM vectors 
JuMP to 64850 ($FD52) 
JuMP to 64855 ($FD57) 
JuMP to 65126 ($FE66) 
JuMP to 61120 ($EECO) 
JuMP to 61134 ($EECE) 
JuMP to 65139 ($FE73) 
JuMP to 65154 ($FE82) 
JuMP to 60190 (SEBIE) 
JuMP to 65135 ($FE6F) 
JuMP to 61209 ($EF19) 
JuMP to 61156 ($EEE4) 
JuMP to 61174 ($EEF6) 
JuMP to 61188 ($EF04) 
JuMP to 60951 ($EE17) 
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Keyboard 



65460 

65463 

65466 

65469 

65493 

65496 

65499 

65502 

65514 

65517 

65520 

65523 

Keyboard 

19 

43-44 

57-58 

145 
153 
154 
184 
185 

186 
197 
198 

204 
208 

212 
216 
245-246 

631-640 
649 

650 

651 

652 

653 

654 

655-656 

658 

788-789 

810-811 

32768-36863 

37136-37151 

37137 

37152-37167 

37152 

37153 

37154 

37159 

37888-38399 



($FFBA) 

($FFB7) 

($FFBA) 

($FFBD) 

($FFD5) 

($FFD8) 

($FFDB) 

($FFDE) 

($FFEA) 

($FFED) 

($FFFO) 

($FFF3) 

($13) 
($2B-2C) 

($39-3A) 

($91) 
($99) 
($9A) 
($B8) 
($B9) 

($BA) 
($C5) 
($C6) 

($CC) 
($D0) 

($D4) 
($D8) 
($F5-F6) 

($277-280) 
($289) 

($28A) 

($28B) 

($28C) 

($28D) 

($28E) 

($28F-290) 

($292) 

($314-315) 

($32A-32B) 

($8000-8FFF) 

($91 10-91 IF) 

($9111) 

($9120-912F) 

($9120) 

($9121) 

($9122) 

($9127) 

($9400-95FF) 



Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 
Jump 



to 60948 
to 65111 
to 65104 
to 65097 
to 62786 
to 63093 
to 63335 
to 63328 
to 63284 
to 58629 
to 58634 
to 58624 



($EE14) 
($FE57) 
($FE50) 
($FE49) 
($F542) 
($F675) 
($F767) 
($F760) 
($F734) 
($E505) 
($E50A) 
($E500) 



U 

u 
u 
u 
u 



Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Line number of the BASIC statement being 

executed 

Keyswitch PIA: bottom keyboard row scan 

Device number of the current input device 

Device number of output device 

Current logical file number being used 

Current secondary address being used (also called 

command) 

Current device number being used 

Matrix coordinate of last key pressed (64 if none) 

Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Cursor blink svidtch; 0= flash, non-0 = quiet 

Flag indicating if input from screen (3) or keyboard 

(0) 

Flag to indicate if within quote marks 

Number of outstanding inserts remaining 

Pointer to which keyboard table being used of four 

possible 

Ten-byte keyboard buffer 

Maximum number of characters in the keyboard 

buffer 

Keyboard repeater flags 

Delay before other than first repeat of key 

Delay before first repeat of key 

Current SHIFT keys pattern 

Previous SHIFT key pattern 

Pointer to the default keyboard table setup routine 

Screen scroll down enabled flag 

Vector to the routine IRQ at 60095 ($EABF) 

Vector to the routine GETIN at 61941 ($F1F5) 

Character maps 

6522 VIA chip 1 

Port A I/O register 

6522 VIA chip 2 

Port B I/O register 

Port A I/O register 

Data direction register for port B 

Timer 1 high order (MSB) latch byte 

Screen color map (8K-I- expanded VIC-20) 
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u 
u 
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n 



Lliik tabic 



n 



n 



n 

n 



49060-49151 


(SAOOO-Bl'tl') 


8K RAM expansion block number 4 


50304 


(SC480) 


Main BASIC loop, receive and execute or store 
BASIC line 


50844 


($C69C) 


BASIC LIST 


52091 


($CB7B) 


BASIC GET 


52159 


(SCBBF) 


BASIC INPUT 


54182 


($D3A6) 


Check if a statement is entered in direct mode 


57344-58527 


($E000-E49F) 




58471 


($E467) 


Perform a warm start of BASIC 


58528-65535 


($E4A0-FFFF) 


Kemal* routine 


58648 


($E518) 


Initialize the 6550 VIC chip, screen, and related 

pointers 

Reset the default device numbers 


58811 


($E5BB) 


58831 


($E5CF) 


Get a character from the keyboard queue and shift 
it down 


58853 


($E5E5) 


Wait for character to appear in the keyboard buffer 


58905 


($E619) 


Empty and display the keyboard buffer up to a car- 
riage return 


58959 


($E64F) 


Obtain INPUT from screen 


59064 


($E6B8) 


Test for quotes and set flag 


59689 


($E929) 


Code conversion table 


60095 


(SEABF) 


IRQ handler 


60190 


(SEBIE) 


Scan the keyboard for keypresses using 6522 VIA2 


60380 


($EBDC) 


Set keyboard decode table address in 245-246 
($F5-F6) 


60486 


($EC46) 


Keyboard decode table addresses 


60777 


($ED69) 


Apparently unused keyboard decoding table 


60916 


(SEDF4) 


LOAD and RUN words for SHIFT and RUN keys 


61941 


($F1F5) 


Routing routine for obtaining a character of input 

data 

Input characters from current input device 


61966 


(SF20E) 


62451 


($F3F3) 


Abort all open channels 


63122 


($F692) 


Save RAM to serial device 


63344 


($F770) 


Check for RUN/STOP key in ($91), purge key- 
board queue and channels if so 


65439 


($FF9F) 


JuMP to 60190 (SEBIE) 


65508 


(SFFE4) 


JuMP off 810-811 ($32A-32B) 


LEFTS 






84-86 


(S54-56) 


Jump opcode and vector to function routine 


54566 


(SD526) 


Garbage collection 


55040 


($D700) 


BASIC LEFTS 


55137 


($D761) 


Obtain string parameters for LEFTS, MIDS, and 
RIGHTS 


LENS 






55164 


($D77C) 


BASIC LENS 


LET 






49164 


(SCOOC) 


Keyword dispatch vector table, in token order 


51172 


($C7E4) 


Execute the current BASIC statement 


51621 


($C9A5) 


BASIC LET 


51650 


(SC9C2) 


LET: assign integer variable 


51674 


($C9DA) 


LET: assign TIS 


51756 


($CA2C) 


LET: assign string variable 



Light pen — see Game port 
Link table — see Screen 
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LIST 

15 


($F) 


19 

20-21 

43-44 


($13) 

($14-15) 

($2B-2C) 


73-74 

87-96 

97-102 

153 

37159 

49164 

49310 

50707 

50844 

50970 

51563 


($49-4A) 

($57-60) 

($61-66) 

($99) 

($9127) 

($COOC) 

($C09E) 

($C613) 

($C69C) 

($C71A) 

($C96B) 


LOAD 

10 
19 
43-44 


($A) 
($13) 
($2B-2C) 


45-46 


($2D-2E) 


47-48 


($2F-30) 


49-50 


($31-32) 


61-62 


($3D-3E) 


73-74 

147 

150 

155 

156 

158 


($49-4A) 

($93) 

($96) 

($9B) 

($9C) 

($9E) 


159 


($9F) 


164 


($A4) 


165 
167 
168 


($A5) 
($A7) 
($A8) 


169 


($A9) 


170 


($AA) 


171 


($AB) 


172-173 


($AC-AD) 


174-175 
176 


($AE-AF) 
($B0) 



Flag byte: LIST quote/collect done/tokenize 

character 

Current channel number for BASIC I/O routines 

Line number integer in two-byte LSB/MSB format 

Pointer to the start of the tokenized BASIC 

program 

Pointer to BASIC variable used in FOR loop 

BASIC numeric work area 

BASIC floating point accumulator one 

Device number of the current input device 

Timer 1 high order (MSB) latch byte 

Keyword dispatch vector table, in token order 

BASIC keyword table in token number order 

Find the BASIC line from its line number 

BASIC LIST 

List detokenized BASIC keywords 

Convert decimal line number to LSB/MSB format 

Tape: 0=LOAD, 1= VERIFY 

Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Pointer to the end of BASIC program, start of 

variables 

Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC arrays, start of free 

area 

Saved TXTPTR of statement executing, to CONT 

on 

Pointer to BASIC variable used in FOR loop 

Tape: 0=LOAD, 1=VERIFY 

Tape: block found flag, tape leader length bit count 

Tape: character parity 

Tape: dipole switch/byte-received flag 

Tape: error log index/filename index/header I.D./ 

out byte 

Tape: pass 2 error pointer/tape buffer filename 

index 

Serial: input byte/cycle counter. Tape: dipole 

number 

Tape: block sync countdown. Serial: countdown 

Tape: write leader count/read block reverse counter 

Tape: error flags; 0=no errors/long word marker 

switch 

Tape: dipole balance counter/medium word marker 

switch 

Tape: input status flags, sync countdown/RS-232 

byte assembly 

Tape: write leader counter/read checksum 

comparison 

Tape/Serial: start address for LOAD, SAVE, and 

VERIFY 

Tape: end address for LOAD, SAVE, and VERIFY 

Tape: dipole timing adjustment values 



□ 
□ 

u 
u 
u 
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LOAD 



177 

178-179 

181 

182 

183 

185 


($B1) 

($B2-B3) 

($B5) 

($B6) 

($B7) 

($B9) 


187-188 

189 

190 

193-194 

195-196 

256-318 

816-817 

828-1019 


($BB-BC) 

($BD) 

($BE) 

($C1-C2) 

($C3-C4) 

($100-13E) 

($330-331) 

($33C-3FB) 


828 
829-830 


($33C) 
($33D-33E) 


49164 
57701 
57809 
58486 
60916 
61625 


($COOC) 
($E165) 
($E1D1) 
($E476) 
($EDF4) 
($F089) 


62786 


($F542) 


62812 
63407 


($F55C) 
($F7AF) 


63565 


($F84D) 


63572 


($F854) 


63680 
63715 
63732 


($F8C0) 
($F8E3) 
($F8F4) 


63837 
64173 


($F95D) 
($FAAD) 


64466 
64523 
64680 
64785 


($F8D2) 
($FCOB) 
($FCA8) 
($FD11) 


64795 


($FD18) 


65097 


($FE49) 


65104 


($FE50) 


Appendix D 
Appendix F 





Tape: dipole timing timer 2 difference 
Tape: pointer to tape buffer 
Tape: flag for currently reading data or leader 
Tape: accumulator for number of read errors 
Number of characters in filename (0-187 or 0-16) 
Current secondary address being used (also called 
command) 

Pointer to the current filename 
RS-232: send parity calculation work byte 
Tape: which copy of block remaining to read/write 
Tape/Serial: pointer to the start of the I/O area 
Pointer to the RAM area being LOADed 
62 bytes of tape error log, indexes of bad data 
Vector to the routine LOAD at 62793 ($F549) 
Tape buffer area, 192 bytes, for headers and BASIC 
program data 

Tape header identifier byte (1-5) 
Starting address of where the tape data was written 
from 

Keyword dispatch vector table, in token order 
BASIC LOAD 

Set LOAD, VERIFY, and SAVE parameters 
Program patch area 

LOAD and RUN words for SHIFT and RUN keys 
RS-232: ILLEGAL DEVICE message for LOAD or 
SAVE 

Load (or verify) to RAM from device number speci- 
fied in 186 ($BA) 

Load or verify RAM from a serial device 
Tape: find next tape header, .X back contains 
header I.D. number 

Tape: load tape buffer address from 178-179 ($B2- 
B3) into .X and .Y 

Tape: set LOAD/SAVE start and end pointers to 
the tape buffer 

Tape: initiate tape header read 
Tape: write blocks to tape 
Tape: common tape read/write; start tape 
operations 

Tape: set time limit for tape dipole 
Tape: determine if to store the input character from 
tape 

Tape: called to reset the tape read pointer 
Tape: data write (IRQ driven) 
Tape: leader write (IRQ driven) 
Compare current to end of LOAD/SAVE pointers 
(tape and serial) 

Increment current LOAD/SAVE pointer (tape and 
serial) 

The filename pointer and length are stored from .X, 
.Y, and .A 

Set the current file number, device, and secondary 
address 

Device, secondary address, status chart 
Block SAVE/LOAD from BASIC programs 
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LOG 



LOG 

49234 
55745 
55786 
57279 
57325 


($C052) 
($D9C1) 
($D9EA) 
($DFBF) 
($DFED) 


Lowercase- 


-see Character 


Message 

1-2 


($1-2) 


12 
15 


($C) 
($F) 


17 
19 

22 
43-44 


($11) 
($13) 
($16) 
($2B-2C) 


57-58 


($39-3A) 


63-64 

153 

157 

183 

198 


($3F-40) 

($99) 

($9D) 

($B7) 

($C6) 


256-511 
320-511 


($100-1FF) 
($140-1FF) 


631-640 
768-778 
768-769 


($277-280) 
($300-30A) 
($300-301) 


828-1019 


($33C-3FB) 


49310 
49566 
49960 
50171 
50184 


($C09E) 
($C19E) 
($C328) 
($C3FB) 
($C408) 


50229 
50231 
50281 
50292 
50528 


($C435) 
($C437) 
($C469) 
($C474) 
($C560) 


50782 
50844 
51287 
51998 


($C65E) 
($C59C) 
($C857) 
($CB1E) 


52045 


($CB4D) 


52159 


($CBBF) 



Function dispatch vector table, in token order 

Constants for LOG function 

BASIC LOG 

Tables for LOG and EXP, in floating point format 

BASIC EXP 



The USR jump vector in LSB/MSB (displacement/ 
page) form 

Flags for locate-or-build-array routines 
Flag byte: LIST quote/collect done/tokenize 
character 

Indicate which of READ, INPUT, or GET is active 
Current channel number for BASIC I/O routines 
Pointer to available slot in temporary string stack 
Pointer to the start of the tokenized BASIC 
program 

Line number of the BASIC statement being 
executed 

Current DATA line number in LSB/MSB form 
Device number of the current input device 
Kemal message control flag 
Number of characters in filename (0-187 or 0-16) 
Number of characters (0-10) in the keyboard buffer 
at 631 ($277) 
STACK 

Stack area used by BASIC, OUT OF MEMORY 
message if exceeded 
Ten-byte keyboard buffer 
Table of indirect BASIC vectors 
Vector to the routine to print a BASIC error mes- 
sage from a table 

Tape buffer area, 192 bytes, for headers and BASIC 
program data 

BASIC keyword table in token number order 
Table of BASIC error messages 
BASIC error message table vectors 
Check stack requested space available 
Check that requested space in dynamic area is 
available 

Set OUT OF MEMORY error message code 
BASIC error message routine 
Display ERROR or another message pointed to 
Display READY, message 

Receive input from device and fill the BASIC text 
buffer 
BASIC CLR 
BASIC LIST 
BASIC CONT 

Part of PRINT: print a string ended by a carriage 
return 

Error message formatting routine for GET, INPUT, 
and READ 
BASIC INPUT 
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M1D$ 



-n 








52230 


($CC06) 


n 


52476 


($CCFC) 


52510 


($CD1E) 


' 


52600 


($CD8A) 




53000 


($CF08) 


r-j 


53533 


($D11D) 




53829 


($D245) 




53832 


($D248) 




53837 


($D24D) 




54182 


($D2A6) 




54190 


($D3AE) 




54407 


{$D487) 




54516 


($D4F4) 




54845 


($D63D) 




55678 


($D97E) 




56770 


($DDC2) 




57325 


($DFED) 




57590 


($E0F6) 




57701 


($E165) 




57870 


($E20E) 




58232 


($E378) 




58372 


($E404) 




58409 


($E429) 




58471 


($E467) 




58566 


($E4BC) 




61625 


($F0B9) 




61812 


($F174) 




61922 


($F1E2) 




61926 


($F1E6) 




62812 


($F55C) 




63047 


($F647) 




63082 


($F66A) 




63272 


($F728) 




63358 


($F77E) 




63407 


($F7AF) 


n 


63636 


($F894) 


63671 


($F8B7) 




63689 


($F8C9) 


n 


63715 


($F8E3) 


65126 


($FE66) 




65424 


($FF90) 


^^ 


NaD$ 




I 

{ 


84-86 


($54-56) 




54566 


($D526) 




55095 


($D737) 


r-i 


55137 


($D761) 



BASIC READ, also common routines for GET and 
INPUT 

INPUT error messages 
BASIC NEXT 
Variable type checking 
Cause SYNTAX ERROR message via jump to 
$C437 

Create new variable 
Display BAD SUBSCRIPT message 
Display ILLEGAL QUANTITY message 
Found the array, check the subscript range 
Check if a statement is entered in direct mode 
Issue an UNDEF'D FUNCTION message for 
EVALFN ($D3F4) 
Scan and set up string 
Allocate memory space for a string 
BASIC +, concatenate string 
Issue OVERFLOW message and exit 
Issue message IN 
BASIC EXP 
BASIC patch routines 
BASIC LOAD 

Insure that a parameter is present after a delimiting 
comma 

Perform a cold start of BASIC 
Display cold start of BASIC messages 
BASIC cold start messages 
Perform a warm start of BASIC 
Program patch area 

RS-232: ILLEGAL DEVICE message for LOAD or 
SAVE 

Table of Kemal messages 

Display LOADING or VERIFYING if control mes- 
sages wanted 

Print Kemal control messages 
Load or verify RAM from a serial device 
Display SEARCHING.... for tape device 
Display LOADING or VERIFYING 
Display SAVING message 
I/O error file error message handler 
Tape: find next tape header, .X back contains 
header I.D. number 

Tape: display PRESS PLAY ON TAPE message 
Tape: display PRESS RECORD & PLAY ON TAPE 
message 

Tape: read blocks from tape 
Tape: write blocks to tape 

Set the byte used to enable/disable Kemal message 
display 
JuMP to 65126 ($FE66) 

Jump opcode and vector to function routine 

Garbage collection 

BASIC MID$ 

Obtain string parameters for LEFT$, MID$, and 

RIGHTS 
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Monitor 



Monitor — see TV 
Multicolor — see Color 
Multiple screen — see Saeen 
Music — see Sound 
NEW 



43-44 


($2B-2C) 


45-46 


($2D-2E) 


47-48 


($2F-30) 


49-50 


($31-32) 


55-56 


($37-38) 


122-123 


($7A-7B) 


256-511 


($100-1FF) 


49164 


(SCOOC) 


50754 


($C642) 


50782 


($C65E) 


50830 


($C68E) 


58232 


($E378) 


58372 


($E404) 


NEXT 




57-58 


($39-3A) 


73-74 


($49-4A) 


49164 


($C00C) 


51010 


($C742) 


52510 


($CD1E) 


NMI 




181 


($B5) 


792-793 


($318-319) 


37136-37151 


($91 10-91 IF) 


37143 


($9117) 


37145 


($9119) 


37148 


($91 IC) 


37149 


($911D) 


37150 


($91 IE) 


37152-37167 


($9120-912F) 


37161 


($9129) 


37164 


($912C) 


37165 


($912D) 


37166 


($912E) 


40960-49151 


($A000-BFFF) 


58805 


($E5B5) 


60951 


($EE17) 


61347 


($EFA3) 


61422 


($EFEE) 


61494 


($F036) 


61698 


($F102) 



Pointer to the start of the tokenized BASIC 

program 

Pointer to the end of BASIC program, start of 

variables 

Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC arrays, start of free 

area 

Pointer to the end of BASIC memory 

Get-BASIC-character routine 

STACK 

Keyword dispatch vector table, in token order 

BASIC NEW 

BASIC CLR 

Back up TXTPTR to the start of the program 

Perform a cold start of BASIC 

Display cold start of BASIC messages 

Line number of the BASIC statement being 

executed 

Pointer to BASIC variable used in FOR loop 

Keyword dispatch vector table, in token order 

BASIC FOR 

BASIC NEXT 

Tape: flag for currently reading data or leader 

Vector to the routine NMI* at 65197 ($FEAD) 

6522 VIA chip 1 

Timer 1 high order (MSB) latch byte 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

6522 VIA chip 2 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

8K RAM expansion block 4 

NMI entry for RESTORE key (no entries to this 

routine found) 

Serial: send listen with attention 

RS-232: send the next bit (NMI continuation 

routine) 

RS-232: prepare the next byte to be sent from send 

buffer 

RS-232: receive an input bit (NMI driven) 

RS-232: set up NMI for transmission 



u 
u 
u 

u 
u 
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u 
u 
u 
u 

D 



PBO, PBI, PB2, PBS, PB4, PBS, PBS, PB7 



61792 



($F160) 



I i 



n 



63284 


($F734) 


63732 


($F8F4) 


64831 


($FD3F) 


65193 


($FEA9) 


65246 


($FEDE) 


65530 


($FFFA) 


NOT 




49164 


($COOC) 


49280 


($C080) 


49310 


($C09E) 


52909 


($CEAD) 


52948 


($CED4) 


57268 


($DFB4) 


ON 




20-21 


($14-15) 


49164 


($C00C) 


51531 


($C94B) 


51563 


($C96B) 


OPEN 




152 


($98) 


183 


($37) 


184 


($38) 


187-188 


($3B-BC) 


247-248 


($F7-F8) 


643-644 


($283-284) 


660 


($294) 


833-1019 


($341-3FD) 


49164 


($COOC) 


50782 


($C65E) 


57809 


($E1D1) 


57878 


($E216) 


Appendix D 




OR 




7 


($7) 


11 


($3) 


18 


($12) 


780-783 


($30C-30F) 


49280 


($C080) 


53222 


($CFE6) 


53225 


($CFE9) 



RS-232: check that serial and tape are idle, to pro- 
tect from RS-232 

Increment the jiffy clock at 160-162 ($A0-A2) 
Tape: common tape read/write, start tape 
operations 

Check for an autostarting program at 40960 
($A000) 

NMI handler routine 
RS-232: NMI sequences 
6502 vector to 65193 ($FEA9) 

Keyword dispatch vector table, in token order 

Math operation dispatch vector table, in token 

order 

BASIC keyword table in token number order 

Factoring is continued 

BASIC NOT 

BASIC monadic — 

Line number integer in two-byte LSB/MSB format 
Ke)rword dispatch vector table, in token order 
BASIC ON 
Convert decimal line number to LSB/MSB format 

Number of currently open files, cannot exceed ten 

Number of characters in filename (0-187 or 0-16) 

Current logical file number being used 

Pointer to the current filename 

RS-232: pointer to start of receiving buffer 

Pointer to the end of user RAM memory, plus one 

RS-232 pseudo-6551 command register 

Filename of tape data 

Keyword dispatch vector table, in token order 

BASIC CLR 

Set LOAD, VERIFY, and SAVE parameters 

Handle parameters for OPEN and CLOSE 

Device, secondary address, status chart 

Search-character for scanning BASIC statements 

BASIC buffer index/array dimensions 

TAN/SIN sign/comparison results 

The BASIC SYS command uses this area to save 

and load 

Math operation dispatch vector table, in token 

order 

BASIC OR 

BASIC AND 



Oscillator — see Sound 

PAO, PAl, PA2, PA3, PA4, PAS, PA6, PA7— see VIA 

Paddle — see Game port 

Pause key — see Keyboard 

PBO, FBI, PB2, PBS, PB4, PBS, PB6, PB7— see VIA 



395 



PEEK 






20-21 




($14-15) 


49234 




($C052) 


55309 




($D80D) 


PI (7) 






52867 




($CE83) 


52904 




($CEA8) 


Pixel- 


see 


Screen 


Pixel map- 


—see Screen 


POKE 






20-21 




($14-15) 


157 




($9D) 


49164 




($C00C) 


55195 




($D79B) 


55275 




($D7EB) 


55332 




($D824) 


61812 




($F174) 


Port A- 


-see 


VIA 


Porl B- 


see 


VIA 


POS 






49234 




($C052) 


54174 




($D39E) 


58634 




($E50A) 


Power on 




0-143 




($0-8F) 







($0) 


1-2 




($1-2) 



3-4 
5-6 

19 

22 
43-44 

51-52 
55-56 
122-123 
139-143 

153 

154 

160-162 

178-179 

195-196 

256-511 

320-511 

641-642 
643-644 

396 



($3-4) 

($5-6) 

($13) 
($16) 
($2B-2C) 

($33-34) 
($37-38) 
($7A-7B) 
($8B-8F) 

($99) 

($9A) 

($A0-A2) 

($B2-B3) 

($C3-C4) 

($100-1FF) 

($140-1FF) 

($281-282) 
($283-284) 



Line number integer in two-byte LSB/MSB format 
Function dispatch vector table, in token order 
BASIC PEEK 



Evaluate a single term of an expression 

The floating point number ?=$82 49 OF DA Al 



Line number integer in two-byte LSB/MSB format 

Kemal message control flag 

Keyword dispatch vector table, in token order 

Obtain number 1-255 

Get two parameters for POKE and WAIT 

BASIC POKE 

Table of Kemal messages 



Function dispatch vector table, in token order 

BASIC POS 

Read or set the current cursor column and line 



Page working storage for BASIC 
6502 JMP opcode 76 ($4C) 
The USR jump vector in LSB/MSB (displacement/ 
page) form 

Vector to floating point to integer conversion 
routines 

Vector to the integer to floating point conversion 
routines 

Current channel number for BASIC I/O routines 
Pointer to available slot in temporary string stack 
Pointer to the start of the tokenized BASIC 
program 

Pointer to the bottom of BASIC active strings 
Pointer to the end of BASIC memory 
Get-BASIC-character routine 
BASIC RND work area, last random number or ini- 
tial seed 

Device number of the current input device 
Device number of output device 
Jiffy clock, realtime clock 
Tape: pointer to tape buffer 
Pointer to the RAM area being LOADed 
STACK 

Stack area used by BASIC, OUT OF MEMORY 
message if exceeded 

Pointer to the start of user RAM memory 
Pointer to the end of user RAM memory, plus one 



u 

u 
u 
u 
u 



u 

u 
u 
u 
u 



i I 



n 

n 



646 

648 

655-656 

788-819 

36866 


($286) 

($288) 

($28F-290) 

($314-333) 

($9002) 


37136-37151 
37136 
37138 
37139 


($9110-911F) 
($9110) 
($9112) 
($9113) 


37147 

37148 

37152-37167 

37154 

37155 


($91 IB) 
($91 IC) 
($9120-912F) 
($9122) 
($9123) 


37163 

37164 

37888-38399 

40960-49151 

49152 


($912B) 

($912C) 

($9400-95FF) 

($A000-BFFF) 

(SCOOO) 


50754 
58232 

58528-65535 
58648 


($C642) 
($E378) 
($E4A0-FFFF) 
($E518) 


58819 
60900 
64802 


($E5C3) 
($EDE4) 
($FD22) 


64850 


($FD52) 


65017 ($FDF9) 
65532 ($FFFC) 
Precedence order 
49280 ($C080) 


PRINT 

19 

653 
657 


($13) 

($28D) 

($291) 


32768-36863 
36866 


($800-8FFF) 
($9002) 


37888-38399 

49164 

50553 

51872 

51944 


($9400-95FF) 

($COOC) 

($C579) 

($CAAO) 

($CAE8) 


51960 
51998 


($CAF8) 
($CB1E) 



Current foreground color selected by color keys 
Screen map RAM page number 
Pointer to the default keyboard table setup routine 
Table of 16 Kemal indirect vectors 
Number of columns displayed, part of screen map 
address 

6522 VIA chip 1 
Port B 1/0 register 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
6522 VIA chip 2 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
Screen color map (8K-1- expanded VIC-20) 
8K RAM expansion block 4 
Vector to the routine for the cold start of BASIC 
58232 ($E378) 
BASIC NEW 

Perform a cold start of BASIC 
Kemal* routine 

Initialize the 6550 VIC chip, screen, and related 
pointers 

Reset the VIC chip registers 
Initial values for VIC chip registers 
Power-on/reset routine (check for autostart 
cartridge) 

Cause the RAM system vectors to be reset to pro- 
vided defaults 

Initialize the 6522 VIA registers 
6502 vector to 64802 ($FD22) 

Math operation dispatch vector table, in token 
order 

Current channel number for BASIC I/O routines 

Current SHIFT keys pattern 

Flag to enable or disable combined SHIFT and 

Commodore keys 

Character maps 

Number of columns displayed, part of saeen map 

address 

Screen color map (8K-I- expanded VIC-20) 

Keyword dispatch vector table, in token order 

Tokenize the BASIC line in BASIC text buffer 

BASIC PRINT 

Part of PRINT: tab to the correct column for 

comma delimiter 

BASIC TAB, BASIC SPC 

Part of PRINT: print a string ended by a carriage 

return 
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pimiT^ 



52027 



($CB3B) 



54407 


($D487) 


58634 


($E50A) 


PRINT* 




19 


($13) 


154 


($9A) 


174-175 


($AE-AF) 


828-1019 


($33C-3FB) 


829-1019 


($33D-3FB) 


49164 


($COOC) 


51840 


($CA80) 


51846 


($CA86) 


Printer 




19 


($13) 


153 


($99) 


185 


($B9) 


186 


($BA) 


32768-36863 


($8000-8FFF) 


37136 


($9110) 


37159 


($9127) 


50844 


($C69C) 


51960 


($CAF8) 


54174 


($D39E) 
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Also see Serial 




Raster — see Screen 


READ 




17 


($11) 


63-64 


($3F-40) 


65-66 


($41-42) 


67-68 


($43-44) 


73-74 


($49-4A) 


75-76 


($4B-4C) 


113-114 


($71-72) 


49164 


($COOC) 


52045 


($CB4D) 


52230 


($CC06) 


54407 


($D487) 


61941 


($F1F5) 


REM 




43-44 


($2B-2C) 


49164 


($COOC) 


50844 


($C69C) 



Part of PRINT: print format characters of space, 

cursor right 

Scan and set up string 

Read or set the current cursor column and line 

Current channel number for BASIC I/O routines 

Device number of output device 

Tape: ending address for LOAD, SAVE, and 

VERIFY 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Tape block of 191 user data bytes from a BASIC 

program 

Keyword dispatch vector table, in token order 

BASIC PRINT* 

BASIC CMD 

Current channel number for BASIC I/O routines 

Device number of the current input device 

Current secondary address being used (also called 

command) 

Current device number being used 

Character maps 

Port B I/O register 

Timer 1 high order (MSB) latch byte 

BASIC LIST 

BASIC TAB, BASIC SPC 

BASIC POS 

Device, secondary address, status chart 



Indicate which of READ, INPUT, or GET is active 

Current DATA line number in LSB/MSB form 

Pointer to the current BASIC data item 

Pointer to source of INPUT, GET, and READ 

information 

Pointer to BASIC variable used in FOR loop 

Math operator displacement/INPUT TXTPTR 

Series evaluation pointer 

Ke5rword dispatch vector table, in token order 

Error message formatting routine for GET, INPUT, 

and READ 

BASIC READ, also common routines for GET and 

INPUT 

Scan and set up string 

Routing routine for obtaining a character of input 

data 

Pointer to the start of the tokenized BASIC 

program 

Keyword dispatch vector table, in token order 

BASIC LIST 



G 
U 
U 
U 

u 
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u 

Ll 
U 
U 
U 



n 

n 



Reset 



n 
n 



51496 
51515 



($C928) 
($C93B) 



Repeat — see Keyboard 



Reset 


1-2 

3-4 

5-6 

19 



($0) 
($1-2) 

($3-4) 

($5-6) 

($13) 



22 


($16) 


43-44 


($2B-2C) 


45-46 


($2D-2E) 


51-52 


($33-34) 


55-56 


($37-38) 


122-123 


($7A-7B) 


139-143 


($8B-8F) 


153 


($99) 


154 


($9A) 


178-179 


($B2-B3) 


195-196 


($C3-C4) 


256-511 


($100-1FF) 


320-511 


($140-1FF) 


641-642 


($281-282) 


643-644 


($283-284) 


646 


($286) 


648 


($288) 


655-656 


($28F-290) 


788-819 


($314-333) 


36866 


($9002) 


37136-37151 


($9110-911F) 


37136 


($9110) 


37138 


($9112) 


37139 


($9113) 


37147 


($911B) 


37148 


($911C) 


37152-37167 


($9120-912F) 


37154 


($9122) 


37155 


($9123) 


37163 


($912B) 


37164 


($912C) 


37888-38399 


($9400-95FF) 


40960-4915 


($A000-BFFF) 


49152 


($C000) 



BASIC IF 
BASIC REM 



6502 JMP opcode 76 ($4C) 

The USR jump vector in LSB/MSB (displacement/ 

page) fonn 

Vector to floating point to integer conversion 

routines 

Vector to the integer to floating point conversion 

routines 

Current channel number for BASIC I/O routines 

Pointer to available slot in temporary string stack 
Pointer to the start of the tokenized BASIC 
program 

Pointer to the end of BASIC program, start of 
variables 

Pointer to the bottom of BASIC active strings 
Pointer to the end of BASIC memory 
Get-BASlC-character routines 
BASIC RND work area, last random number of ini- 
tial seed 

Device number of the current input device 
Device number of output device 
Tape: pointer to tape buffer 
Pointer to the RAM area being LOADed 
STACK 

Stack area used by BASIC, OUT OF MEMORY 
message if exceeded 

Pointer to the start of user RAM memory 
Pointer to the end of user RAM memory, plus one 
Current foreground color selected by color keys 
Screen map RAM page number 
Pointer to the default keyboard table setup routine 
Table of 16 Kemal indirect vectors 
Number of columns displayed, part of screen map 
address 

6522 VIA chip 1 
Port B I/O register 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
6522 VIA chip 2 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
Screen color map (8K-I- expanded VIC-20) 
8K RAM expansion block 4 
Vector to the routine for the cold start of BASIC 
58232 ($E378) 
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u 



SeBi 



u 



50754 
58232 

58528-65535 
58648 

58819 
60900 
64802 

64850 

65017 

65532 

Reset switch 

0-143 



45-46 

37136-37151 
RESTORE 

65-66 
49164 
51229 
58486 



($C642) BASIC NEW 

($E378) Perform a cold start of BASIC 

($E4A0-FFFF) Kerrial* routine 

($E518) Initialize the 6550 VIC chip, screen, and related 

pointers 

($E5C3) Reset the VIC chip registers 

($EDE4) Initial values for VIC chip registers 

($FD22) Power-on/reset routine (check for autostart 

cartridge) 

($FD52) Cause the RAM system vectors to be reset to pro- 

vided defaults 

($FDF9) Initialize the 6522 VIA registers 

($FFFC) 6502 vector to 64802 ($FD22) 

($0-8F) Page working storage for BASIC 

($0) 6502 JMP opcode 76 ($4C) 

($2D-2E) Pointer to the end of BASIC program, start of 

variables 
($9110-911F) 6522 VIA chip 1 

($41-42) Pointer to the current BASIC data item 

($C00C) Ke)rword dispatch vector table, in token order 

($C81D) BASIC RESTORE 

($E476) Program patch area 



u 
u 
u 



RESTORE key— see STOP/RESTORE 

RETURN 

57-58 

73-74 
49164 
51331 
51410 



($39-3A) Line number of the BASIC statement being 

executed 
($49-4A) Pointer to BASIC variable used in FOR loop 

($COOC) Keyword dispatch vector table, in token order 

($C883) BASIC GOSUB 

($C8D2) BASIC RETURN 



Reverse — see Screen; Keyboard 

RIGHTS 

84-86 
54566 
55084 
55137 



($54-56) 
($D526) 
($D72C) 
($D761) 



RND 

139-143 

49234 

57482 
57492 
58247 

58624 

RS-232 

19 

55-56 
139-143 
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Jump opcode and vector to function routine 

Garbage collection 

BASIC RIGHT$ 

Obtain string parameters for LEFT$, MID$, and 

RIGHT$ 

($8B-8F) BASIC RND work area, last random number or ini- 

tial seed 

($C052) Function dispatch vector table, in token order 

($E08A) Table of constants for RND 

($E094) BASIC RND 

($E387) CHRGET routine and RND seed to be copied to 

page RAM 

($E500) Retrieve the address of the I/O memory page 

($13) Current channel number for BASIC I/O routines 

($37-38) Pointer to the end of >BASIC memory 

($8B-8F) BASIC RND work area, last random number or ini- 

tial seed 



u 
u 
u 
u 



11 



146 



($92) 



153 


($99) 


167 


($A7) 


168 


($A8) 



169 



170 



171 



669 



670 



($A9) 
($AA) 
($AB) 



178-179 


($B2-B3) 


180 


($B4) 


181 


($B5) 


182 


($B6) 


183 


($B7) 


186 


($BA) 


187-188 


($BB-BC) 


189 


($BD) 


247-248 


($F7-F8) 


249-250 


($F9-FA) 


643-644 


($283-284) 


659 


($293) 


660 


($294) 


661-662 


($295-296) 


663 


($297) 


664 


($298) 


665-666 


($299-29A) 


667 


($29B) 


668 


($29C) 



($29D) 
($29E) 





37136-37151 


($91 10-91 IF) 




37136 


($9110) 




37137 


($9111) 




37140 


($9114) 


m 


37141 


($9115) 


( ! 


37143 


($9117) 




37145 


($9119) 




37148 


($911C) 


n 


37149 


($91 ID) 


1 1 


37150 


($91 IE) 




50782 


($C65E) 




57590 


($E0F6) 


f—i 


58853 


($E5E5) 


60951 


($EE17) 




61347 


($EFA3) 


n 


61375 


($EFBF) 



Tape: 0/1 bit timebase fluctuation during read 

operations 

Device number of the current input device 

Tape: write leader count/read block reverse counter 

Tape: error flags; 0=no errors/long word marker 

switch 

Tape: dipole balance counter/medium word marker 

switch 

Tape: input status flags, sync countdown/RS-232 

byte assembly 

Tape: write leader counter/read checksum 

comparison 

Tape: pointer to tape buffer 

Tape: miscellaneous flags/RS-232: various usage 

Tape: flag for currently reading data or leader 

Tape: accumulator for number of read errors 

Number of characters in filename (0-187 or 0-16) 

Current device number being used 

Pointer to the current filename 

RS-232: send parity calculation work byte 

RS-232: pointer to start of receiving buffer 

RS-232: pointer to the start of the transmitting 

buffer 

Pointer to the end of user RAM memory, plus one 

RS-232 pseudo-6551 control register 

RS-232 pseudo-6551 command register 

RS-232 nonstandard bit timing specification 

RS-232 status register 

RS-232 number of bits to be sent/received 

RS-232 system clock divided by baud 

rate = microseconds 

RS-232 dynamic index to the end of the receive 

buffer 

RS-232 dynamic index to the start of the receive 

buffer 

RS-232 dynamic index to the start of the transmit 

buffer 

RS-232 dynamic index to the end of the transmit 

buffer 

6522 VIA chip 1 

Port B I/O register 

Port A I/O register 

imer 1 least significant byte (LSB) of count 

Timer 1 most significant byte (MSB) of count 

Timer 1 high order (MSB) latch byte 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

BASIC CLR 

BASIC patch routines 

Wait for character to appear in the keyboard buffer 

Serial: send listen with attention 

RS-232: send the next bit (NMI continuation 

routine) 

RS-232: calculate parity and stop bits value 
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RUN 



u 
u 



61416 


($EFE8) 


61422 


($EFEE) 


61462 


($F016) 


61479 


($F027) 


61494 


($F036) 


61515 


($F04B) 


61531 


($F05B) 


61544 


($Fa68) 


61551 


($F06F) 


61579 


($F08B) 


61597 


($F09D) 


61602 


($F0A2) 


61605 


($F0A5) 


61608 


($F0A8) 


61610 


($F0AA) 


61625 


($F0B9) 


61628 


($FOBC) 


61677 


($FOED) 


61698 


($F102) 


61718 


($F116) 


61775 


($F14F) 



61792 



61941 



45-46 



402 



($F160) 
($F1F5) 



61966 


($F20E) 


62063 


($F26F) 


62074 


($F27A) 


62151 


($F2C7) 


62217 


($F309) 


62282 


($F34A) 


62474 


($F40A) 


62663 


($F4C7) 


62786 


($F542) 


63122 


($F692) 


63732 


($F8F4) 


65111 


($FE57) 


65128 


($FE68) 


65246 


($FEDE) 


65372 


($FF5C) 


65463 


($FFB7) 
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RUN 




19 


($13) 


43-44 


($2B-2C) 



($2D-2E) 



RS-232: transmit stop bits 

RS-232: prepare the next byte to be sent from send 
buffer 

RS-232: set clear-to-send or data-set-ready missing 
status 

RS-232: compute desired word length bit count 
RS-232: receive an input bit (NMI driven) 
RS-232: determine if all the stop bits have been re- 
ceived yet 

RS-232: prepare to receive the next input byte 
RS-232: check for start bit in receive mode 
RS-232: put constructed byte into receive buffer 
RS-232: parity checking of the input byte 
RS-232: parity error on input byte 
RS-232: buffer overrun on input byte 
RS-232: break detected on input 
RS-232: framing error on input 
RS-232: set input error status and continue 
RS-232: ILLEGAL DEVICE message for LOAD or 
SAVE 

RS-232: open an RS-232 channel for output 
RS-232: store a character in the transmit buffer 
RS-232: set up NMI for transmission 
RS-232: open an RS-232 channel for input 
RS-232: retrieve the next character from the receive 
buffer 

RS-232: check that serial and tape are idle, to pro- 
tect from RS-232 

Routing routine for obtaining a character of input 
data 

Input characters from current input device 
Obtain a byte from the RS-232 device 
Output character to current output device 
Open .X file number channel for input 
Open .X file number channel for output 
Close logical file number in .A 
Open a logical file, file number in 184 ($38) 
RS-232: open RS-232 device 
Load (or verify) to RAM from device number speci- 
fied in 186 ($BA) 
Save RAM to serial device 
Tape: common tape read/write; start tape 
operations 

Reset RS-232 status, branch to 65128 for non-RS- 
232 status 

Load .A with the non-RS-232 I/O status ST 
RS-232: NMI sequences 
RS-232: VIA timer 2 values for baud rate table 
JuMP to 65111 ($FE57) 
Device, secondary address, status chart 

Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Pointer to the end of BASIC program, start of 

variables 



Li 
U 
U 



U 
U 
U 
U 
U 



I > 


47-48 


($2F-30) 


r-i 


49-50 


($31-32) 


1 1 

1 : 


157 

40960-49151 

49164 

50782 

51313 

58853 

60916 


($9D) 

($A000-BFFF) 

($COOC) 

($C65E) 

($C871) 

($E5E5) 

($EDF4) 




RVSOFF 

199 

32768-36863 

32678-33791 


($C7) 

($8000-8FFF) 

($8000-83FF) 




34816-35839 


($8800-8BFF) 




35840-36863 


($8C00-8FFF) 




36869 
59202 


($9005) 
($E742) 




RVSON 

199 

212 

32768-36863 

33792-34815 


($C7) 
($D4) 

($8000-8FFF) 
($8400-87FF) 




35840-36863 


($8C00-8FFF) 




36869 
59202 


($9005) 
($E742) 




SAVE 

43-44 


($2B-2C) 




45-46 


($2D-2E) 




147 
155 
158 


($93) 
($93) 
($9E) 


(—1 


165 
168 


($A5) 
($A8) 


/ 1 


169 


($A9) 


n 


170 


($AA) 


' 1 


171 


($AB) 


n " 


172-173 


($AC-AD) 


ri 


174-175 
178-179 
183 


($AE-AF) 

($B2-B3) 

($B7) 



Pointer to the end of BASIC variables, start of 

arrays 

Pointer to the end of BASIC arrays, start of free 

area 

Kemal message control flag 

8K RAM expansion block 4 

Keyword dispatch vector table, in token order 

BASIC CLR 

BASIC RUN 

Wait for character to appear in the keyboard buffer 

LOAD and RUN words for SHIFT and RUN keys 

Flag for reversed screen characters 
Character maps 

Uppercase and graphics nonreversed screen charac- 
ter map 

Lowercase and uppercase nonreversed screen 
character map 

Reversed lowercase and uppercase screen character 
map 

Screen map and character map addresses 
Handle characters going to the screen 

Flag for reversed saeen characters 

Flag to indicate if within quote marks 

Character maps 

Reversed uppercase and graphics screen character 

map 

Reversed lowercase and uppercase screen character 

map 

Screen map and character map addresses 

Handle characters going to the screen 

Pointer to the start of the tokenized BASIC 

program 

Pointer to the end of BASIC program, start of 

variables 

Tape: = LOAD, 1= VERIFY 

Tape: character parity 

Tape: error log index/filename index/header I.D./ 

out byte 

Tape: block sync countdown/Serial: countdown 

Tape: error flags, 0=no errors/long word marker 

switch 

Tape: dipble balance counter/medium word marker 

switch 

Tape: input status flags, sjmc countdown/RS-232 

byte assembly 

Tape: write leader counter/read checksum 

comparison 

Tape/Serial: start address for LOAD/SAVE/ 

VERIFY 

Tape: ending address for LOAD/SAVE/VERIFY 

Tape: pointer to tape buffer 

Number of characters in filename (0-187 or 0-16) 
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Seals? 



187-188 


($BB-BC) 


189 


($BD) 


190 


($BE) 


193-194 


($C1-C2) 


195-196 


($C3-C4) 


818-819 


($332-333) 


828-1019 


($33C-3FB) 


828 


($33C) 


833-1019 


($341-3FB) 


49164 


($C00C) 


49310 


($C09E) 


57683 


($E153) 


57809 


($E1D1) 


61625 


($F0B9) 


62812 


($F55C) 


63122 


($F692) 


63217 


($F6F1) 


63463 


{$F/t7) 


63572 


($F854) 


63680 


($F8C0) 


63715 


($F8E3) 


63752 


($F8F4) 


63886 


($F98E) 


64523 


($FCOB) 


64661 


($FC95) 


64680 


($FCA8) 


64719 


($FCCF) 


64785 


($FD11) 



64795 



65097 



65104 



($FD1B) 
($FE49) 
($FE50) 



Appendix D 
Appendix F 

Scaler — see Variabl^^. 

Screen 

9 ($9) 



19 


($13) 


43-44 


($2B-2C) 


55-56 


($37-38) 


153 


($99) 


154 


($9A) 


184 


($B8) 


185 


($B9) 



Pointer to the current filename 

RS-232: send parity calculation work byte 

Tape: which copy of block remaining to read/write 

Tape/Serial: pointer to the start of the I/O area 

Pointer to the RAM area being LOADed 

Vector to the routine SAVE at 63109 ($F685) 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Tape header identifier byte (1-5) 

Filename of tape data 

Keyword dispatch vector table, in token order 

BASIC keyword table in token number order 

BASIC SAVE 

Set LOAD, VERIFY, and SAVE parameters 

RS-232: ILLEGAL DEVICE message for LOAD or 

SAVE 

Load or verify RAM from a serial device 

Save RAM to serial device 

Save RAM to tape 

Tape: build an output tape header in the tape 

buffer area 

Tape: set LOAD/SAVE start and end pointers in 

the tape buffer 

Tape: initiate tape header read 

Tape: write blocks to tape 

Tape: common tape read/write; start tape 

operations 

Tape: read tape data bits into location 191 ($BF) 

(IRQ driven) 

Tape: data write (IRQ driven) 

Tape: block leader write (IRQ driven) 

Tape: leader write (IRQ driven) 

Tape: restore IRQ vector 

Compare current to end of LOAD/SAVE pointers 

(tape and serial) 

Increment current LOAD/SAVE pointer (tape and 

serial) 

The filename pointer and length are stored from .X, 

.Y, and .A 

Set the current file number, device, and secondary 

address 

Device, secondary address, status chart 

Block SAVE/LOAD from BASIC programs 



Column that the cursor was on just before last TAB 

orSPC 

Current channel number for BASIC I/O routines 

Pointer to the start of the tokenized BASIC 

program 

Pointer to the end of BASIC memory 

Device number of the current input device 

Device number of output device 

Current logical file number being used 

Current secondary address being used (also called 

command) 
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n 



186 ($BA) Current device number being used 

193-194 ($C1-C2) Tape/Serial: pointer to the start of the I/O area 

197 ($C5) Matrix coordinate of last key pressed (64 if none) 

198 ($C6) Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

199 ($C7) Flag for reversed screen characters 

200 ($C8) Pointer to the end of line for input 
201-202 ($C9-CA) Cursor current logical position (line, column) 
206 ($CE) Character under cursor (in screen POKE code) 
208 ($D0) Flag indicating if input from screen (3) or keyboard 

(0) 
209-210 ($D1-D2) Pointer to the start of the logical line that the 

cursor is on 

211 ($D3) Cursor position within the logical screen line 

212 ($D4) Flag to indicate if within quote marks 

213 ($D5) Current screen line logical length (21,43,65,87) 

214 ($D6) Cursor: current physical screen line cursor is on (0- 

22) 

215 ($D7) ASCII value of last key pressed 

216 ($D8) Number of outstanding inserts remaining 
217-241 ($D9-F1) Screen line link table 

242 ($F2) Save byte for screen line link table byte 

243-244 ($F3-F4) Pointer to the current physical screen lines color 

map area 

512-600 ($200-258) 89-byte BASIC input buffer 

631-640 ($277-280) Ten-byte keyboard buffer 

646 ($286) Current foreground color selected by color keys 

647 ($287) Cursor: original color at this screen location 

648 ($288) Screen map RAM page number 
653 ($28D) Current SHIFT keys pattern 
658 ($292) Screen scroll down enabled flag 
7680-8191 ($1E00-1FFF) Screen map RAM on VIC-20 with less than 8K 

expansion 

7680-8191 ($1E00-1FFF) Screen map RAM on VIC-20 with only 3K 

expansion 

4096-4607 ($1000-1 IFF) Screen map RAM on VIC-20 with 8K-I- expansion 

32768-36863 ($8000-8FFF) Character maps 

32768-33791 ($8000-83FF) Uppercase and graphics nonreversed screen charac- 
ter map 

33792-34815 ($8400-87FF) Reversed uppercase and graphics screen character 

map 

34816-35839 ($8800-8BFF) Lowercase and uppercase nonreversed screen 

character map 

35840-36863 ($8C00-8FFF) Reversed lowercase and uppercase saeen character 

map 

36864-37135 ($9000-910F) 6560 VIC chip 

36864 ($9000) Left edge of TV picture and interlace switch 

36865 ($9001) Bits 7-0: vertical TV picture origin 

36866 ($9002) Number of columns displayed, part of screen map 

address 

36867 ($9003) Number of character lines displayed, part of raster 

location 

36868 ($9004) Raster beam location 

36869 ($9005) Screen map and character map addresses 

36870 ($9006) Light pen horizontal screen location 

36871 ($9007) Light pen vertical screen location 
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Screen 



36879 
37159 

37888-38399 
50528 


($900F) 
($9127) 
($9400-95FF) 
($C560) 


50844 
52159 
54174 
58471 
58629 


($C69C) 
($CBBF) 
($D39E) 
($E467) 
($E505) 


58634 
58648 


($E50A) 
($E518) 


58719 
58753 
58759 
58811 
58959 
59064 
59077 
59144 


($E55F) 
($E581) 
($E587) 
($E5BB) 
($E64F) 
($E6B8) 
($E6C5) 
($E6EA) 


59181 
59202 
59587 
59624 


($E72D) 
($E742) 
($E8e3) 
($E8E8) 


59642 
59765 
59886 


($E8FA) 
($E975) 
($E9EE) 


59990 
60014 


($EA56) 
($EA6E) 


60030 


($EA7E) 


60045 
60065 


($EA8D) 
($EAA1) 


60074 
60082 


($EAAA) 
($EAB2) 


60763 


($ED5B) 


60925 
61966 
62074 
62451 
62786 


($EDFD) 

($F20E) 

($F27A) 

($F3F3) 

($F542) 


63122 
64802 


($F692) 
($FD22) 


64909 
65234 


($FD8D) 
($FED2) 



Background color, border color, inverse color switch 
Timer 1 high order (MSB) latch byte 
Screen color map (8K+ expanded VIC-20) 
Receive input from device and fill the BASIC text 
buffer 
BASIC LIST 
BASIC INPUT 
BASIC POS 

Perform a warm start of BASIC 
Retrieve the maximum number of screen columns 
and lines 

Read or set the current cursor column and line 
Initialize the 6550 VIC chip, screen, and related 
pointers 
Clear the screen 

Move the cursor to the screen home position 
Reset the screen line link table pointers 
Reset the default device numbers 
Obtain INPUT from screen 
Test for quotes and set flag 
Set up display of a character on the screen 
Advance the cursor on the screen, add lines, and 
scroll 

Back up cursor into the previous logical saeen line 
Handle characters going to the screen 
Advance cursor to the next logical screen line 
Move the cursor to the end of the previous saeen 
line 

Move the cursor to the start of the next screen line 
Scroll the screen 

Open up a blank physical line on the screen for 
inserts 

Move screen line 

The address of the screen line and color line is set 
in memory 

Set a pointer to the address of the start of a screen 
line 

Blank out a physical screen line 
Sjmchronize color to byte and store character on 
screen 

Store a character on the screen 
The address of the color map byte for screen map 
is found 

Called by routine SCROLL ($E6EA) to mark the 
next physical screen line 
Screen line link table LSB of lines in screen map 
Input characters from current input device 
Output character to current output device 
Abort all open channels 

Load (or verify) to RAM from device number speci- 
fied in 186 ($BA) 
Save RAM to serial device 
Power-on/reset routine (checks for autostart 
cartridge) 

Initialize system memory 
BREAK interrupt entry 
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Serial 



65517 ($FFED) 

Appendix C 
Appendix E 

Screen line link — see Screen 

Screen map — see Screen 

Screen POKE — see Screen 

Secondary address 

144 ($90) 
153 ($99) 
172-173 ($AC-AD) 



Jump to 58629 ($E505) 

Code Chart with screen POKE codes 

Vahd screen relocation addresses 



174-175 



($AE-AF) 



184 
185 


($B8) 
($B9) 


195-196 
601-610 


($C3-C4) 
($259-262) 


621-630 
828-1019 


($26D-276) 
($33C-3FB) 


828 

57683 

57701 

57787 

57796 

57809 

57878 

61120 


($33C) 

($E153) 

($E165) 

($E1BB) 

($E1C4) 

($E1D1) 

($E216) 

($EECO) 


61134 
61156 
62282 
62431 


($EECE) 
($EEE4) 
($F34A) 
($F3DF) 


62474 
62613 


($F40A) 
($F495) 


62812 
63217 
65104 


($F55C) 
($F6F1) 
($FE50) 


65130 


($FE6A) 


65247 
65430 
65466 
Appendix D 


($FF93) 
($FF96) 
($FFBA) 


Serial 




19 

148 

149 


($13) 
($94) 
($95) 



ST status of I/O completion 

Device number of the current input device 

Tape/Serial: start address for LOAD/SAVE/ 

VERIFY 

Tape: ending address for LOAD, SAVE, and 

VERIFY 

Current logical file number being used 

Current secondary address being used (also called 

command) 

Pointer to the RAM area being lOADed 

Open logical file number table (ten one-byte 

entries) 

Open secondary address table (ten one-byte entries) 

Tape buffer area, 192 bytes, for headers and BASIC 

program 

Tape header identifier byte (1-5) 

BASIC SAVE 

BASIC LOAD 

BASIC OPEN 

BASIC CLOSE 

Set LOAD, VERIFY, and SAVE parameters 

Handle parameters for OPEN and CLOSE 

Serial: send secondary address after listen 

command 

Serial: send secondary address after talk command 

Serial: send a byte on the serial line 

Close logical file number in .A 

Set file characteristics of file (.X) into 184-186 

($B8-BA) 

Open a logical file, file number in 184 ($B8) 

Send secondary address and filename to a serial 

device 

Load or verify RAM from a serial device 

Save RAM to tape 

Set the current file number, device, and secondary 

address 

OR .A with the contents of 144 ($90) ST and store 

there 

JuMP to 61120 ($EECO) 

Jump to 61134 ($EECE) 

JuMP to 65104 ($FE50) 

Device, secondary address, status chart 

Current channel number for BASIC I/O routines 
Serial: output deferred character flag 
Serial: output buffered character 
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Sevial 



153 


($99) 


163 


($A3) 


164 


($A4) 


165 


($A5) 


172-173 


($AC-AD) 


174-175 


($AE-AF) 


178-179 


($B2-B3) 


185 


($B9) 


186 


($BA) 


193-194 


($C1-C2) 


198 


($C6) 


645 


($285) 


828-1019 


($33C-3FB) 


37137 


($9111) 


37139 


($9113) 


37146 


($911A) 


37148 


($91 IC) 


37150 


($91 IE) 


37160 


($9128) 


37161 


($9129) 


37162 


($912A) 


37164 


($912C) 


37166 


($912E) 


57878 


($E216) 


58528 


($E4A0) 


58537 


($E4A9) 


58546 


($E4B2) 


60948 


($EE14) 


60951 


($EE17) 


60956 


($EE1C) 


61001 


($EE49) 


61108 


($EEBA) 


61120 


($EECO) 


61125 


($EEC5) 


61134 


(SEECE) 


61156 


($EEE4) 


61174 


($EEF6) 


61188 


($EF04) 


61209 


($EF19) 


61316 


($EF84) 


61325 


($EF8D) 


61334 


($EF96) 


61792 


($F160) 


61966 


($F20E) 


62052 


($F264) 



Device number of the current input device 
Serial: input bit count/Tape: input/output bit count 
Serial: input byte/cycle counter/Tape: dipole 
number 

Tape: block sync countdown/Serial: countdown 
Tape/Serial: start address for LOAD/SAVE/ 
VERIFY 

Tape: ending address for LOAD, SAVE, and 
VERIFY 

Tape: pointer to tape buffer 
Current secondary address being used (also called 
command) 

Current device number being used 
Tape/Serial: pointer to the start of the I/O area 
Number of characters (0-10) in the keyboard buffer 
at 631 ($277) 

Serial: timeout enable/disable flag 
Tape buffer area, 192 bytes, for headers and BASIC 
program data 
Port A I/O register 

Eight bits, each of which corresponds to the same- 
numbered bit 

Shift register for parallel/serial conversion 
Peripheral control register for handshaking 
Interrupt enable register 
Timer 2 low order (LSB) counter and LSB latch 
Timer 2 high order (MSB) counter and MSB latch 
Shift register for parallel/serial conversion 
Peripheral control register for handshaking 
Interrupt enable register 
Handle parameters for OPEN and CLOSE 
Serial: output a 1 on the serial data line 
Serial: output a on the serial data line 
Serial: get an input bit from VIAl and stabilize 
Serial: send talk with attention 
Serial: send listen with attention 
Serial: prepare to send serial command with 
attention 

Serial: send command or data to serial devices 
Serial: set ST for timeout or DEVICE NOT 
PRESENT 

Serial: send secondary address after listen 
command 

Serial: clear attention 

Serial: send secondary address after talk command 
Serial: send a byte on the serial line 
Serial: send untalk command to serial devices 
Serial: send unlisten command to serial devices 
Serial: receive byte from serial device 
Serial: set clock line high 
Serial: set clock line low 
Serial: delay one millisecond 
RS-232: check that serial and tape are idle, to pro- 
tect from RS-232 

Input characters from current input device 
Obtain a byte from the serial line 



U 
U 

u 
u 
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u 
u 
u 

L) 
U 



n 



n 
n 



n 



62074 
62151 
62217 
62451 
62474 
62613 


($F27A) 
($F2C7) 
($F309) 
($F3F3) 
($F40A) 
($F495) 


62786 


($F542) 


62812 
63122 
64785 


($F55C) 
($F692) 
($FD11) 


64795 


($FD1B) 


65427 
65430 
65445 
65448 
65451 
65454 
65457 
65460 
Appendix D 


($FF93) 
($FF96) 
($FFA5) 
($FF48) 
($FFAB) 
($FFAE) 
($FFB1) 
($FFB4) 


Serial port— see Serial 


SGN 

97-102 
49234 
52909 
56377 


($61-66) 
($C052) 
($CEAD) 
($DC39) 


smpT 

183 
203 


($B7)- 
($CB) 


657 


($291) 


4096-4607 
33792-34815 


($1000-1 IFF) 
($8400-8yFF) 


34816-35839 


($8800-88FF) 


35840-36863 


($8C00-8FFF) 


36869 
59202 
60510 
60835 


($9005) 
($E742) 
($EC5E) 
($EDA3) 


Also see Keyboard 


Shift register- 


-see VIA 


SIN 

18 
49234 


($12) 
($C052) 



Output character to current output device 
Open .X file number channel for input 
Open .X file number channel for output 
Abort all open channels 
Open a logical file, file number in 184 ($B8) 
Send secondary address and filename in a serial 
device 

Load (or verify) to RAM from device number speci- 
fied in 186 ($BA) 

Load or verify RAM from a serial device 
Save RAM to serial device 
Compare current to end of LOAD/SAVE pointers 
(tape and serial) 

Increment current LOAD/SAVE pointer (tape and 
serial) 

JuMP to 61120 ($EECO) 
JuMP to 61134 ($EECE) 
JuMP to 61209 ($EF19) 
JuMP to 61156 ($EEE4) 
JuMP to 61174 ($EEF6) 
JuMP to 61188 ($EF04) 
JuMP to 60951 ($EE17) 
JuMP to 50948 ($EE14) 
Device, secondary address, status chart 



BASIC Floating Point Accumulator 1 
Function dispatch vector table, in token order 
Factoring is continued 
BASIC SGN 

Number of characters in filename (0-187 or 0-16) 

Matrix-coordinate of current key pressed (64 if 

none) 

Flag to enable or disable combined SHIFT and 

Commodore keys 

Screen map RAM on VIC-20 vidth 8K+ expansion 

Reversed uppercase and graphics screen character 

map 

Lowercase and uppercase nonreversed screen 

character map 

Reversed lowercase and uppercase screen character 

map 

Screen map and character map addresses 

Handle characters going to the screen 

Table used for decoding unshifted keys into ASCII 

Table used for decoding CTRL SHIFTed keys into 

ASCII 



TAN/SIN sign/comparison results 
Function dispatch vector table, in token order 
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Sound 



57960 


($E268) 


58077 


($E2DD) 


Sound 




36864-37135 


($9000-910F) 


36869 


($9005) 


36874 


($900A) 


36875 


($900B) 


36876 


($900C) 


36877 


($900D) 


36878 


($900E) 


37146 


($911 A) 


37147 


($91 IB) 


37162 


($912A) 


37163 


($9123) 


SPC 




9 


($9) 


49164 


($COOC) 


49310 


($C09E) 


51872 


(SCAAO) 


51960 


($CAF8) 


58634 


($E50A) 


SQR 




49234 


($C052) 


57105 


($DF11) 


57201 


($DF71) 


ST 




144 


($90) 


663 


($297) 


51872 


($CAAO) 


52091 


($CB7B) 


53032 


($CF28) 


53533 


($D11D) 


57701 


($E165) 


61108 


($EEB4) 


62000 


($F230) 


62052 


($F264) 


64173 


($FAAD) 


65111 


($FE57) 


65128 


($FE68) 


65130 


($FE6A) 
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STEP 




73-74 


($49-4A) 


49164 


($C00C) 


49310 


($C09E) 


52510 


($CD1E) 


55740 


($D9BC) 


STOP 




57-58 


($29-3A) 



BASIC SIN 

Trig evaluation constant values used for COS, SIN, 

and TAN 

6560 VIC CHIP 

Screen map and character map addresses 

Relative frequency of sound oscillator 1 (bass) 

Relative frequency of sound oscillator 2 (alto) 

Relative frequency of sound oscillator 3 (soprano) 

Relative frequency of sound oscillator 4 (noise) 

Sound volume and auxiliary color 

Shift register for parallel/serial conversion 

Auxiliary control register 

Shift register for parallel/serial conversion 

Auxiliary control register 

Column that the cursor was on just before last TAB 

or SPC 

Keywrord dispatch vector table, in token order 

BASIC keyword table in token number order 

BASIC PRINT 

BASIC TAB, BASIC SPC 

Read or set the current cursor column and line 

Function dispatch vector table, in token order 
0.5 constant for rounding and SQR 
BASIC SQR 

ST status of I/O completion 

RS-232 stahis register 

BASIC PRINT 

BASIC GET 

Obtain variable name and type 

Create new variable 

BASIC LOAD 

Serial: set ST for timeout or DEVICE NOT 

PRESENT 

Obtain a byte from the tape buffer 

Obtain a byte from the serial line 

Tape: determine if to store the input character from 

tape 

Reset RS-232 stahis, branch to 61528 ($FE68) for 

non-RS-232 status 

Load .A with the non-RS-232 I/O status ST 

OR .A with the contents of 144 ($90) ST and store 

there 

Device, secondary address, status chart 

Pointer to BASIC variable used in FOR loop 
Ke)rword dispatch vector table, in token order 
BASIC keyword table in token number order 
BASIC NEXT 
Constant to zero a floating point accumulator 

Line number of the BASIC statement being 
executed 



u 
u 
u 
u 
u 
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u 
iJ 
u 
u 

u 



STOP key 



n 
n 



n 



59-60 


($3B-3C) 


49164 


($COOC) 


50020 


($C364) 


51247 


($C82F) 


51287 


($C857) 


STOP key 




57-58 


($39-3A) 


59-60 


($3B-3C) 


145 


($91) 


160-162 


($A0-A2) 


195-196 


($C3-C4) 


197 


($C5) 


198 


($C6) 


671-672 


($29F-2A0) 


788-819 


($314-333) 


788-789 


($314-315) 


808-809 


($328-329) 


37136-37151 


($91 10-91 IF) 


37138 


($9112) 


37139 


($9113) 


37147 


($91 IB) 


37148 


($91 IC) 


37149 


($91 ID) 


37152-37167 


($9120-912F) 


37152 


($9120) 


37153 


($9121) 


37154 


($9122) 


37155 


($9123) 


37159 


($9127) 


37163 


($912B) 


37164 


($912C) 


50020 


($C364) 


50844 


($C69C) 


51118 


($C7AE) 


51244 


($C82C) 


51287 


($C857) 


54566 


($D526) 


59765 


($E975) 


60095 


($EABF) 


62451 


($F3F3) 


62812 


($F55C) 


63122 


($F692) 


63217 


($F6F1) 


63284 


($F734) 


63344 


($F770) 


63407 


($F7AF) 


63463 


($F7E7) 



Previous BASIC line number executed 
Keyword dispatch vector table, in token order 
Miscellaneous messages 
BASIC STOP 
BASIC CONT 

Line number of the BASIC statement being 
executed 

Previous BASIC line number executed 
Keyswitch PIA: bottom keyboard row scan 
Jiffy clock, realtime clock 
Pointer to the RAM area being LOADed 
Matrix coordinate of last key pressed (64 if none) 
Number of characters (0-10) in the keyboard buffer 
at 631 ($277) 

Temporary save area for the normal IRQ vector 
during tape I/O 

Table of 16 Kemal indirect vectors 
Vector to the IRQ at 60095 ($EABF) 
Vector to the test STOP key routine at 63344 
($F770) 

6522 VIA chip 1 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
Interrupt flag register 
6522 VIA chip 2 
Port B I/O register 
Port A I/O register 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 

Timer 1 high order (MSB) latch byte 
Auxiliary control register 
Peripheral control register for handshaking 
Miscellaneous messages 
BASIC LIST 

Find (for execution) the next BASIC statement 
Test for STOP key 
BASIC CONT 
Garbage collection 
Scroll the screen 
IRQ handler 
Abort all open channels 
Load or verify RAM from a serial device 
Save RAM to serial device 
Save RAM to tape 

Increment the jiffy clock at 160-162 ($A0-A2) 
Check for STOP key in $91, purge keyboard queue 
and channels if so 

Tape: find next tape header, .X back contains 
header I.D. number 

Tape: build an output tape header in the tape 
buffer area 
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63591 

63636 
63732 



($F867) 

($F894) 
($F8F4) 



63819 ($F94B) 

64719 ($FCCF) 

65193 ($FEA9) 

65505 ($FFE1) 
STOP/RESTORE 

19 ($13) 

198 ($C6) 



646 
649 

788-819 

790-791 

792-793 

36864-37135 

36866 

37136-37151 
37138 



37139 

37147 
37148 

37152-37167 
37154 



37155 

37159 
37163 
37164 
49154 
50782 
58471 
58648 

58819 
60900 
64580 

65017 
65193 
65234 
STR$ 

54373 
54407 
55179 



($286) 
($289) 

($314-333) 

($316-317) 

($318-319) 

($9000-910F) 

($9002) 

($91 10-91 IF) 
($9112) Data 
direction register 
for port B 
($9113) 

($91 IB) 
($91 IC) 
($9120-912F) 
($9122) Data 
direction register 
for port B 
($9123) 

($9127) 
($912B) 
($912C) 
($C002) 
($C65E) 
($E467) 
($E518) 

($E5C3) 
($EDE4) 
($FD52) 

($FDF9) 
($FEA9) 
($FED2) 

($D465) 
($D487) 
($D78B) 



Tape: find the tape header for a specified filename 

(or next) 

Tape: display PRESS PLAY ON TAPE message 

Tape: common tape read/write, start tape 

operations 

Tape: check for the STOP key 

Tape: restore IRQ vector 

NMI handler routine 

Jump off 808-809 ($328-329) 

Current channel number for BASIC I/O routines 

Number of characters (0-10) in the keyboard buffer 

at 631 ($277) 

Current foreground color selected by color keys 

Maximum number of characters in the keyboard 

buffer 

Table of 16 Kemal indirect vectors 

Vector to the routine BREAK* at 65234 ($FED2) 

Vector to the routine NMI* at 65197 ($FEAD) 

6560 VIC chip 

Number of columns displayed, part of screen map 

address 

6522 VIA chip 1 



Eight bits, each of which corresponds to the same- 
numbered bit 
Auxiliary control register 
Peripheral control register for handshaking 
6522 VIA chip 2 



Eight bits, each of which corresponds to the same- 
numbered bit 

Timer 1 high order (MSB) latch byte 
Auxiliary control register 
Peripheral control register for handshaking 
Vector to the routine to do the warm start of BASIC 
BASIC CLR 

Perform a warm start of BASIC 
Initialize the 6550 VIC chip, screen, and related 
pointers 

Reset the VIC chip registers 
Initial values for VIC chip registers 
Cause the RAM system vectors to be reset to pro- 
vided defaults 

Initialize the 6522 VIA registers 
NMI handler routine 
BREAK interrupt entry 

BASIC STR$ 

Scan and set up string 

BASIC ASC 
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n 

R 
R 
R 



R 
R 
R 
R 
R 



SYS 

1-2 

19 

20-21 

153 

154 

217-241 

780-783 

828-1019 

49164 
55287 

58639 

TAB 

9 

49164 

49310 

51872 

51960 

58634 

TAN 

18 

49234 

57960 

58033 

58077 

Tape 

19 

113-114 

146 

150 
153 
155 
156 
158 

159 

163 
164 

165 
166 
167 
168 

169 

170 



($1-2) The USR jump vector in LSB/MSB (displacement/ 

page) form 
($13) Current channel number for BASIC I/O routines 

($14-15) Line number integer in two-byte LSB/MSB format 

($99) Device number of the current input device 

($9 A) Device number of output device 

($D9-F1) Saeen line link table 

($30C-30F) The BASIC SYS command uses this area to save 

and load 
($33C-3FB) Tape buffer area, 192 bytes, for headers and BASIC 

program data 
($COOC) Keyword dispatch vector table, in token order 

($D7F7) Convert floating point FAC to two-byte positive 

integer 
($E127) BASIC SYS 

($9) Column that the cursor was on just before last TAB 

orSPC 

($COOC) Keyword dispatch vector table, in token order 

($C09E) BASIC keyword table in token number order 

($CAAO) BASIC PRINT 

($CAF8) BASIC TAB, BASIC SPC 

($E50A) Read or set the current cursor column and line 

($12) TAN/SIN sign/comparison results 

($C052) Function dispatch vector table, in token order 

($E268) BASIC SIN 

($E2B1) BASIC TAN 

($E2DD) Trig evaluation constant values used for COS, SIN, 

and TAN 

($13) Current channel number for BASIC I/O routines 

($71-72) Series evaluation pointer 

($92) Tape: 0/1 bit timebase fluctuation during read 

operations 
($96) Tape: block found flag, tape leader length bit count 

($99) Device number of the current input device 

($9B) Tape: character parity 

($9C) Tape: dipole switch/byte-received flag 

($9E) Tape: error log index/filename index/header I.D./ 

out byte 
($9F) Tape: pass 2 error pointer/tape buffer filename 

index 
($A3) Serial: input bit count/Tape: input/output bit count 

($A4) Serial: input byte/cycle counter/Tape: dipole 

number 
($A5) Tape: block sync countdown/Serial: countdown 

($A6) Tape: count of characters in the tape buffer 

($A7) Tape: write leader count/read block reverse counter 

($A8) Tape: error flags; 0=no errors/long word marker 

switch 
($A9) Tape: dipole balance counter/medium word marker 

switch 
($AA) Tape: input status flags, sync countdown/RS-232 

byte assembly 
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171 



172-173 



174-175 



($AB) 

($AC-AD) 

($AE-AF) 



176 


($B0) 


177 


($B1) 


178-179 


($B2-B3) 


180 


($B4) 


181 


($B5) 


182 


($B6) 


183 


($B7) 


185 


($B9) 


186 


($BA) 


187-188 


($BB-BC) 


189 


($BD) 


191 


($BF) 


192 


($C0) 


193-194 


($C1-C2) 


195-196 


($C3-C4) 


215 


($D7) 


256-318 


($100-13E) 


631-640 


($277-280) 


671-672 


($29F-2A0) 


788-789 


($314-315) 


828-1019 


($33C-3FB) 


828 


($33C) 


829-830 


($33D-33E) 


831-832 


($33F-340) 


833-1019 


($341-3FD) 


1020-1023 


($3FC-3FF) 


37137 


($9111) 


37140 


($9114) 


37143 


($9117) 


37148 


($91 IC) 


37150 


($91 IE) 


37152 


($9120) 


37156 


($9124) 


37157 


($9125) 


37158 


($9126) 


37159 


($9127) 


37160 


($9128) 


37161 


($9129) 


37164 


($912C) 


37166 


($912E) 


50844 


($C69C) 


52091 


($CB7B) 


57701 


($E165) 


57796 


($E1C4) 


58566 


($E4BC) 



Tape: write leader counter/read checksum 

comparison 

Tape/Serial: start address for LOAD, SAVE, 

VERIFY 

Tape: ending address for LOAD, SAVE, and 

VERIFY 

Tape: dipole timing adjustment values 

Tape: dipole timing timer 2 difference 

Tape: pointer to tape buffer 

Tape: miscellaneous flags/RS-232: various usage 

Tape: flag for currently reading data or leader 

Tape: accumulator for number of read errors 

Number of characters in filename (0-187 or 0-16) 

Current secondary address being used (also called 

command) 

Current device number being used 

Pointer to the current filename 

RS-232: send parity calculation work byte 

Tape: input byte currently being constructed 

Tape: motor interlock switch 

Tape/Serial: pointer to the start of the I/O area 

Pointer to the RAM area being LOADed 

ASCII value of last key pressed 

62 bytes of tape error log, indexes of bad data 

Ten-byte keyboard buffer 

Temporary save area for the normal IRQ vector 

during tape I/O 

Vector to the routine IRQ at 60095 ($EABF) 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Tape header identifier byte (1-5) 

Starting address of where the tape data was written 

from 

Ending address, plus one, of where the tape data 

was written from 

Filename of tape data 

Unused area 

Port A I/O register 

Timer 1 least significant byte (LSB) of count 

Timer 1 high order (MSB) latch byte 

Peripheral control register for handshaking 

Interrupt enable register 

Port B I/O register 

Timer 1 least significant byte (LSB) of count 

Timer 1 most sigtuficant byte (MSB) of count 

Timer 1 low (LSB) latch byte 

Timer 1 high order (MSB) latch byte 

Timer 2 low order (LSB) counter and LSB latch 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt enable register 

BASIC LIST 

BASIC GET 

BASIC LOAD 

BASIC CLOSE 

Program patch area 



u 
u 
u 
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U 
U 
U 
U 



( 






— ] 






60095 
61792 


($EABF) 
($F160) 


n 


62000 
62032 


($F230) 
($F250) 


n 


62096 
62282 
62474 
62786 


($F290) 
($F34A) 
($F40A) 
($F542) 




62812 
63047 
63122 
63217 
63407 


($F55C) 
($F647) 
($F692) 
($F6F1) 
($F7AF) 



n 
n 

n 
n 



63463 



65365 



($F7E7) 
($F84D) 



63572 


($F854) 


63591 


($F867) 


63626 
63636 
63659 


($F88A) 
($F894) 
($F8AB) 


63671 


($F8B7) 


63680 
63689 
63715 
63732 


($F8C0) 
($F8C9) 
($F8E3) 
($F8F4) 


63819 
63837 
63886 


($F94B) 
($F95D) 
($F98E) 


64173 


($FAAD) 


64466 
64475 
64490 


($FBD2) 
($FBDB) 
($FBEA) 


64523 
64661 
64680 
64719 
64748 
64776 
64785 


($FCOB) 
($FC95) 
($FCA8) 
($FCCF) 
($FCF6) 
($FD08) 
($FD11) 



64795 



($FD1B) 



Tape 



IRQ handler 

RS-232: check that serial and tape are idle, to pro- 
tect from RS-232 

Obtain a byte from the tape buffer 
Load .A with next tape character, getting block 
when needed 
Output a character to tape 
Close logical file number in .A 
Open a logical file, file number in 184 ($B8) 
Load (or verify) to RAM from device number speci- 
fied in 186 ($BA) 

Load or verify RAM from a serial device 
Display SEARCHING.... message for tape device 
Save RAM to serial device 
Save RAM to tape 

Tape: find next tape header, .X back contains 
header I.D. number 

Tape: build an output tape header in the tape 
buffer area 

Tape: load tape buffer address from 178-179 ($B2- 
B3) into .X and .Y 

Tape: set LOAD/SAVE start and end pointers to 
the tape buffer 

Tape: find the tape header for a specified filename 
(or next) 

Tape: increment the tape buffer character counter 
Tape: display PRESS PLAY ON TAPE message 
Tape: check tape play/rewind/forward button 
status 

Tape: display PRESS RECORD & PLAY ON TAPE 
message 

Tape: initiate tape header read 
Tape: read blocks from tape 
Tape: write blocks to tape 
Tape: common tape read/vmte, start tape 
operations 

Tape: check for the STOP key 
Tape: set time limit for tape dipole 
Tape: read tape data bits into location 191 ($BF) 
(IRQ driven) 

Tape: determine if to store the input character from 
tape 

Tape: called to reset the tape read pointer 
Tape: new tape character setup 
Tape: toggle the tape write line to invert the output 
signal 

Tape: data write (IRQ driven) 
Tape: block leader vrate (IRQ driven) 
Tape: leader write (IRQ driven) 
Tape: restore IRQ vector 
Tape: reset the current IRQ vector 
Tape: kill motor 

Compare current to end of LOAD/SAVE pointers 
(tape and serial) 

Increment current LOAD/SAVE pointer (tape and 
serial) 
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64909 


($FD8D) 


65009 


($FDF1) 


65097 


($FE49) 


Appendix D 




Tape button- 


-see Tape 


Tape port — see Tape 


TV 




36864 


($9000) 


36865 


($9001) 


36866 


($9002) 


36867 


($9003) 


36868 


($9004) 


36870 


($9006) 


36871 


($9007) 


36878 


($900E) 


37159 


($9127) 


TV columns. 


rv lines, TV ] 


THEN 




49164 


($C00C) 


49310 


($C09E) 


51496 


($C928) 


TI — see Timer 




TI$ 




113-114 


($71-72) 


160-162 


($A0-A2) 


256-266 


($100-10A) 


37157 


($9125) 


37159 


($9127) 


51621 


($C9A5) 


51674 


($C9DA) 


51872 


($CAAO) 


53032 


($CF28) 


53533 


($D11D) 


55341 


($D82D) 


56034 


($DAE2) 


56797 


($DDDD) 


57146 


($DF3A) 


63328 


($F760) 


63335 


($¥767) 


Timer 




139-143 


($8B-8F) 


177 


($B1) 


180 


($B4) 


665-666 


($299-29A) 



Initialize system memory 

IRQ vectors table 

The filename pointer and length are stored from .X, 

.Y, and .A 

Device, secondary address, status chart 



Left edge of TV picture and interlace switch 

Bits 7-0; vertical TV picture origin 

Number of columns displayed, part of screen map 

address 

Number of character lines displayed, part of raster 

location 

Raster beam location 

Light pen horizontal screen location 

Light pen vertical saeen location 

Sound volume and auxiliary color 

Timer 1 high order (MSB) latch byte 



Keyword dispatch vector table, in token order 
BASIC keyword table in token number order 
BASIC IF 



Series evaluation pointer 

Jiffy clock, realtime clock 

Temporary floating point to ASCII work area for 

printing numbers 

Timer 1 most significant byte (MSB) of count 

Timer 1 high order (MSB) latch byte 

BASIC LET 

LET: assign TI$ 

BASIC PRINT 

Obtain variable name and type 

Create new variable 

BASIC WAIT 

Multiply FAC by 10 

Convert FAC to TI$ or an ASCII string 

Constants for TI$ division conversion 

Put jiffy clock from 160-162 ($A0-A2) into .Y, .X, 

and .A 

Set time into jiffy clock 160-162 ($A0-A2) from .Y, 

.X, and .A 

BASIC RND work area, last random number or ini- 
tial seed 

Tape: dipole timing timer 2 difference 
Tape: miscellaneous flags/RS-232: various usage 
RS-232 system clock divided by baud 
rate = microseconds 



U 

u 
u 
u 
u 
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u 
u 
u 
u 
u 



n 

n 
n 
n 
n 



n 
n 
n 

n 

n 



Token 



788-789 ($314-315) Vector to the routine IRQ at 60095 ($EABF) 

792-793 ($318-319) Vector to the routine NMI* at 65197 ($FEAD) 

37136 ($9110) Port B I/O register 

37140 ($9114) Timer lleast significant byte (LSB) of count 

37141 ($9115) Timer 1 most significant byte (MSB) of count 
37143 ($9117) Timer 1 high order (MSB) latch byte 

37145 ($9119) Timer 2 high order (MSB) counter and MSB latch 

37146 ($911 A) Shift register for parallel/serial conversion 

37147 ($91 IB) Auxiliary control register 
37149 ($911D) Interrupt flag register 

37156 ($9124) Timer 1 least significant byte (LSB) of count 

37157 ($9125) Timer 1 most significant byte (MSB) of count 

37158 ($9126) Timer 1 low (LSB) latch byte 

37159 ($9127) Timer 1 high order (MSB) latch byte 

37160 ($9128) Timer 2 low order (LSB) counter and LSB latch 

37161 ($9129) Timer 2 high order (MSB) counter and MSB latch 

37162 ($912A) Shift register for parallel/serial conversion 

37163 ($912B) Auxiliary control register 

37165 ($912D) Interrupt flag register 

37166 ($912E) Interrupt enable register 

58624 ($E500) Retrieve the address of the I/O memory page 

60095 ($EABF) IRQ handler 

61334 ($EF96) Serial: delay one millisecond 

61494 ($F036) RS-232: receive an input bit (NMI driven) 

61531 ($F05B) RS-232: prepare to receive the next input byte 

61698 ($F102) RS-232: set up NMI for transmission 

61718 ($F116) RS-232: open an RS-232 channel for input 

62663 ($F4C7) RS-232: open RS-232 device 

63732 ($F8F4) Tape: common tape read/ write, start tape 

operations 

63837 ($F95D) Tape: set time limit for tape dipole 

64490 ($FBEA) Tape: toggle the tape write line to invert the output 

signal 

64523 ($FCOB) Tape: data write (IRQ driven) 

64680 ($FCA8) Tape: leader write (IRQ driven) 

65017 ($FDF9) Initialize the 6522 VIA registers 

65193 ($FEA9) NMI handler routine 

65246 ($FEDE) RS-232: NMI sequences 

65372 ($FF5C) RS-232: VIA timer 2 values for baud rate table 

TO 

73-74 ($49-4A) Pointer to BASIC variable used in FOR loop 

49164 ($COOC) Keyword dispatch vector table, in token order 

49310 ($C09E) BASIC keyword table in token number order 

52510 ($CD1E) BASIC NEXT 

Token 

8 ($8) Scan-quotes flag for scaniung BASIC statements 

11 ($B) BASIC buffer index/array dimensions 

15 ($F) Flag byte: LIST quote/collect done/tokenize 

character 

43-44 ($2B-2C) Pointer to the start of the tokenized BASIC 

program 

61-62 ($3D-3E) Saved TXTPTR of statement executing, to CONT 

on 

113-114 ($71-72) Series evaluation pointer 

122-123 ($7A-7B) Get-BASIC-character routine 

153 ($99) Device number of the current input device 
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u 


Uppercase 




- 








512-600 


($200-258) 


89-byte BASIC mput buffer 




772-773 


($304-305) 


Vector to the BASIC tokenization routine 




77^-775 


($306-307) 


Vector to the BASIC routine that expands and 








prints tokens 




776-777 


($308-309) 


Vector to the BASIC routine that executes the next 






BASIC token 




49164 


($COOC) 


Keyword dispatch vector table, in token order 




49234 


($C052) 


Function dispatch vector table, in token order 




49280 


($C080) 


Math operation dispatch vector table, in token 






order 




49310 


($C09E) 


BASIC keyword table in token number order 




50332 


($C49C) 


Store/replace a BASIC program line 




50553 


($C579) 


Tokenize the BASIC line in BASIC text buffer 




50844 


($C69C) 


BASIC LIST 




50970 


($C71A) 


List detokenized BASIC keywords 




51172 


($C7E4) 


Execute the current BASIC statement 




51531 


($C94B) 


BASIC ON 




54241 


($D3E1) 


Check DEF FN and FN syntax 




Appendix C 




Tokens for BASIC keywords in numerical order 




Uppercase — 


see Character 






User port 








19 


($13) 


Current channel number for BASIC I/O routines 




153 


($99) 


Device number of the current input device 




186 


($BA) 


Current device number being used 




37136-37151 


($9110-911F) 


6522 VIA chip 1 




37136 


($9110) 


Port B I/O register 




37137 


($9111) 


Port A I/O register 




37140 


($9114) 


Timer 1 least significant byte (LSB) of count 




37146 


($911 A) 


Shift register for parallel/serial conversion 




37162 


($912A) 


Shift register for parallel/serial conversion 




USR 











($0) 


6502 JMP opcode 76 ($4C) 




1-2 


($1-2) 


The USR jump vector in LSB/MSB (displacement/ 
page) form 




49234 


($C052) 


Function dispatch vector table, in token order 




VAL 








113-114 


($71-72) 


Series evaluation pointer 




49234 


($C052) 


Function dispatch vector table, in token order 




55170 


($D782) 


Get string information 




55213 


($D7AD) 


BASIC VAL 




56563 


($DCF3) 


Convert an ASCII string to a floating point number 


u 






inFAC 


Variables 








45-46 


($2D-2E) 


Pointer to the end of BASIC program, start of 


_ 






variables 


— 


49-50 


($31-32) 


Pointer to the end of BASIC arrays, start of free 


50104 


($C3B8) 


area 

Open space in memory for a new BASIC line or 








variable 


.. 


50111 


($C3BF) 


Move a block of memory 


50782 


($C65E) 


BASIC CLR 




51010 


($C742) 


BASIC FOR 





51621 
418 


($C9A5) 


BASIC LET 


\^M^ 



n 

n 
n 

n 



n 

n 
n 



Vector to 



52638 ($CD9E) Fonnula/expression evaluation 

53377 ($D081) BASIC DIM 

54141 ($D37D) BASIC FRE 

Appendix B Format of variables and floating point accumulators 

Vector to , « . • ^ .. 

3_4 ($3-4) Vector to the routines that convert floating pomt to 

integer 
5_6 ($5-6) Vector to the routines that convert integer to float- 

ing point 
84-86 ($54-56) Jump opcode and vector to function routine 

768-769 ($300-301) Vector to the routine to print a BASIC error mes- 

sage from a table 
700-711 ($302-303) Vector to the BASIC main routine (execute or store 

statement) 
772-773 ($304-305) Vector to the BASIC tokenizatton routine 

774-775 ($306-307) Vector to the BASIC routine that expands and 

prints tokens 
776-777 ($308-309) Vector to the BASIC routine that executes the next 

BASIC token 
77%-779 ($30A-730B) Vector to the BASIC routine that evaluates a 

variable 
788-789 ($314-315) Vector to the routine IRQ at 60095 ($EABF) 

790-791 ($316-317) Vector to the routine BREAK* at 65234 ($FED2) 

792-793 ($318-319) Vector to the routine NMI* at 65197 ($FEAD) 

794-795 ($31A-31B) Vector to the open logical file routine OPEN at 

62474 ($F40A) 
796-797 ($31C-31D) Vector to the close logical file routine CLOSE at 

62282 ($F34A) 
798-799 ($31E-31F) Vector to the open input channel routine CHKIN at 

62151 ($F2C7) 
800-801 ($320-321) Vector to the open output channel routine 

CHKOUT at 62217 ($F309) 
802-803 ($322-323) Vector to the reset all channels routine CLRCHN at 

62451 ($F3F3) 
804-805 ($324-325) Vector to the input-from-device routine CHRIN at 

61966 ($F20E) 
806-807 ($326-327) Vector to the output-to-device routine CHROUT at 

62074 ($F27A) 
808-809 ($328-329) Vector to the test STOP key routine STOP at 63344 

($F770) 
810-811 ($32A-32B) Vector to the get-from-keyboard routine GETIN at 

61941 ($F1F5) 
812-813 ($32C-32D) Vector to the abort all files routine CLALL at 62447 

($F3EF) 
814-815 ($32E-32F) User vector can be placed here; held over from PET 

ML monitor 
816-817 ($330-331) Vector to the load from device routine LOAD at 

62793 ($F549) 
818-819 ($332-333) Vector to the Kemal SAVE to device routine SAVE 

at 63109 ($F685) 
49152 ($C000) Vector to the routine for the cold start of BASIC 

58232 ($E378) 
49154 ($C002) Vector to the routine to do the warm start of BASIC 

58471 ($E467) 
49164 ($COOC) BASIC keyword handler routines dispatch vector 

table 
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n 



49234 



49280 



($C052) 
($C080) 



64719 


($FCCF) 


65472 


($EFCO) 


65475 


($FFC3) 


65478 


($FFC6) 


65481 


($FFC9) 


65484 


($FFCC) 


65487 


($FFCF) 


65490 


($FFU2) 


65505 


($FF1:1) 


65508 


($FFE4) 


65511 


($FFl-7) 


65530 


($FFFA) 


65532 


($FFFC) 


65534 


($FFFE) 


Also see JuMP to 


VERIFY 




10 


($A) 


172-173 


($AC-AD) 


183 


($B7) 


187-188 


($BB-BC) 


828-1019 


($33C-3FB) 


49164 


($COOC) 


50020 


($C364) 


57698 


($E162) 


57701 


($E165) 


57809 


($E1D1) 


VIA 




139-143 


($8B-8F) 


145 


($91) 


176 


($B0) 


177 


($B1) 


181 


($B5) 


631-640 


($277-280) 


645 


($285) 


660 


($294) 


665-666 


($299-29A) 


792-793 


($318-319) 


37136-37151 


($9110-911F) 


37136 


($9110) 


37137 


($9111) 


37138 


($9112) 


37139 


($9113) 


37140 


($9114) 


37141 


($9115) 


37142 


($9116) 



BASIC function handler routines dispatch vector 

table 

BASIC math operation handler routines dispatch 

vector table 

Tape: restore IRQ vector 

Jump off 794-795 ($31A-31B) 

Jump off 796-797 ($31C-31D) 

Jump off 798-799 ($31E-31F) 

Jump off 800-801 ($320-321) 

Jump off 802-803 ($322-323) 

Jump off 804-805 ($324-325) 

Jump off 806-807 ($326-327) 

JuMP off 808-809 ($328-329) 

Jump off 810-811 ($32A-32B) 

JuMP off 812-813 ($32C-32D) 

6502 vector to 65193 ($FEA9) 

6502 vector to 64802 ($FD22) 

6502 vector to 65394 ($FF72) 



Tape: 0=LOAD, 1=VERIFY 

Tape/Serial: start address for LOAD/SAVE/ 

VERIFY 

Number of characters in filename (0-187 or 0-16) 

Pointer to the current filename 

Tape buffer area, 192 bytes, for headers and BASIC 

program data 

Keyword dispatch vector table, in token order 

Miscellaneous messages 

BASIC VERIFY 

BASIC LOAD 

Set LOAD, VERIFY, and SAVE parameters 

BASIC RND Vifork area, last random number of ini- 
tial seed 

Keyswitch PIA: bottom keyboard row scan 
Tape: dipole timing adjustment values 
Tape: dipole timing timer 2 difference 
Tape: flag for currently reading data or leader 
Ten-byte keyboard buffer 
Serial: timeout enable/disable flag 
RS-232 pseudo-6551 command register 
RS-232 system clock divided by baud 
rate = microseconds 

Vector to the routine NMI* at 65197 ($FEAD) 
6522 VIA chip 1 
Port B I/O register 
Port A I/O register 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 

Timer 1 least significant byte (LSB) of count 
Timer 1 most significant byte (MSB) of count 
Timer 1 low (LSB) latch byte 



u 
u 

a 
u 
u 
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U 

u 
u 
u 
u 



n 

n 
n 
n 



n 



n 



37143 


($9117) 


37144 


($9118) 


37145 


($9119) 


37146 


($911A) 


37147 


($91 IB) 


37148 


($91 IC) 


37149 


($91 ID) 


37150 


($91 IE) 


37151 


($91 IF) 


37152-37167 


($9120-912F) 


37152 


($9120) 


37153 


($9121) 


37154 


($9122) 


37155 


($9123) 


37156 


($9124) 


37157 


($9125) 


37158 


($9126) 


37159 


($9127) 


37160 


($9128) 


37161 


($9129) 


37162 


($912A) 


37163 


($912B) 


37164 


($912C) 


37165 


($91 2D) 


37166 


($912E) 


37167 


($912F) 


55341 


($D82D) 


58528 


($E4A0) 


58537 


($E4A9) 


58546 


($E4B2) 


58624 


($E500) 


60095 


($EABF) 


60190 


($EB1E) 


61125 


($EEC5) 


61316 


($EF84) 


61325 


($EF8D) 


61334 


($EF96) 


61347 


($EFA3) 


61531 


($F05B) 


61698 


($F102) 


61718 


($F116) 


62663 


($F4C7) 


63284 


($F734) 


63659 


($F8AB) 


63732 


($F8F4) 


64523 


($FCOB) 


64719 


($FCCF) 


64776 


($FD08) 


64802 


($FD22) 


65017 


($FDF9) 


65193 


($FEA9) 



¥EJi 



Timer 1 high order (MSB) latch byte 
Timer 2 low order (LSB) counter and LSB latch 
Timer 2 high order (MSB) counter and MSB latch 
Shift register for parallel/serial conversion 
Auxiliary control register 
Peripheral control register for handshaking 
Interrupt flag register 
Interrupt enable register 
Mirror of port A I/O register at 37137 ($9111) 
6522 VIA chip 2 
Port B I/O register 
Port A I/O register 
Data direction register for port B 
Eight bits, each of which corresponds to the same- 
numbered bit 

Timer 1 least significant byte (LSB) of count 
Timer 1 most significant byte (MSB) of count 
Timer 1 low order (LSB) latch byte 
Timer 1 high order (MSB) latch byte 
Timer 2 low order (LSB) counter and LSB latch 
Timer 2 high order (MSB) counter and MSB latch 
Shift register for parallel/serial conversion 
Auxiliary control register 
Peripheral control register for handshaking 
Interrupt flag register 
Interrupt enable register 
Mirror of port A I/O register at 37153 ($9121) 
BASIC WAIT 

Serial: output a 1 on the serial data line 
Serial: output a on the serial data line 
Serial: get an input bit from VIAl and stabilize 
Retrieve the address of the I/O memory page 
IRQ handler 

Scan the keyboard for keypresses using 6522 VIA2 
Serial: clear attention 
Serial: set clock line high 
Serial: set clock line low 
Serial: delay one millisecond 
RS-232: send the next bit (NMI continuation 
routine) 

RS-232: prepare to receive the next input byte 
RS-232: set up NMI for transmission 
RS-232: open an RS-232 channel for input 
RS-232: open RS-232 device 
Increment the jiffy clock at 160-162 ($A0-A2) 
Tape: check tape play /rewind/forward button 
status 

Tape: common tape read/write, start tape 
operations 

Tape: data write (IRQ driven) 
Tape: restore IRQ vector 
Tape: kill motor 

Power-on/reset routine (checks for autostart 
cartridge) 

Initialize the 6522 VIA registers 
NMI handler routine 
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VIC chip 



65234 


($FED2) 


65246 


($FEDE) 


65372 


($FF5C) 


65439 


($FF9F) 


VIC chip 




1024-4095 


($400-FFF) 


36864-37135 


($9000-910F) 


36865 


($9001) 


36866 


($9002) 


36868 


($9004) 


36869 


($9005) 


36870 


($9006) 


36872 


($9008) 


36880-37135 


($9010-910F) 


37136-37151 


($91 10-91 IF) 


37159 


($9127) 


37888-38399 


($9400-95FF) 


58629 


. ($E505) 


58648 


($E518) 


58819 


($E5C3) 


60380 


($EBDC) 


60705 


($ED21) 


60900 


($EDE4) 


64802 


($FD22) 


65234 


($FED2) 


Video matrix 




4096-4607 


($1000-1 IFF) 


Voice — see Sound 


WAIT 




20-21 


($14-15) 


73-74 


($49-4A) 


49164 


($COOC) 


55195 


($D79B) 


55275 


($D7EB) 


55341 


($D82D) 


Warm start 




49154 


($C002) 


58471 


($E467) 


65234 


($FED2) ■ 


6502 







($0) 


1-2 


($1-2) 


84-86 


($54-56) 


87-96 


($57-60) 


122-123 


($7A-7B) 


255 


($FF) 


256-511 


($100-1FF) 



BREAK Interrupt entry 

RS-232: NMI sequences 

RS-232: VIA timer 2 values for baud rate table 

Jump to 60190 ($EB1E) 

3072 bytes of expansion RAM area 

6560 VIC chip 

Bits 7-0: vertical TV picture origin 

Number of columns displayed, part of screen map 

address 

Raster beam location • 

Screen map and character map addresses 

Light pen horizontal screen location 

Potentiometer X/Paddle X value 

Future expansion RAM/ROM space 

6522 VIA chip 1 

Timer 1 high order (MSB) latch byte 

Screen color map (8K+ expanded VIC-20) 

Retrieve the maximum number of saeen columns 

and lines 

Initialize the 6550 VIC chip, screen, and related 

pointers 

Reset the VIC chip registers 

Set keyboard decode table address in 245-246 

($F5-F6) 

Used to set uppercase/graphics character set 

Initial values for VIC chip registers 

Power-on/reset routine' (checks for autostart 

cartridge) 

BREAK interrupt entry 

Screen map RAM on VIC-20 with 8K-I- expansion 



Line number integer in two-byte LSB/MSB format 
Pointer to BASIC variable used in FOR loop 
Keyword dispatch vector table, in token order 
Obtain number 1-255 
Get two parameters for POKE and WAIT 
BASIC WAIT 

Vector to the routine to do the warm start of BASIC 
Perform a warm start of BASIC 
BREAK interrupt entry 

6502 JMP opcode 76 ($4C) 

The USR jump vector in LSB/MSB (displacement/ 

page) form 

Jump opcode and vector to function routine 

BASIC numeric work area. 

Get-BASIC-character routine 

BASIC temporary area for floating point to ASCII 

conversion 

STACK 



u 
u 
u 
u 

u 
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Li 
U 
U 
U 

u 



rr 






1 






780-783 


{$30C-30F) 




780 


($30C) 


r^. 


781 


($30D) 


1 ! 


782 


($30E) 




783 


($30F) 




37143 


($9117) 


1 — ' 


37145 


($9119) 


1 1 


37148 


($911C) 




37149 


($91 ID) 




37150 


($91 IE) 




37152-37167 


($9120-912F) 




37159 


($9127) 




37161 


($9129) 




37164 


($912C) 




37165 


($912D) 




37166 


($912E) 




50782 


($C65E) 




58232 


($E378) 




58471 


($E467) 




58486 


($E476) 




60095 


($EABF) 




64802 


($FD22) 




65193 


($FEA9) 




65366 


($FF56) 




65394 


($FF72) 




65526 


($FFF6) 




65530 


($FFFA) 




65532 


($FFFC) 




65534 


($FFFt;) 




Appendix C 





S502 



The BASIC SYS command uses this area to save 

and load 

6502 .A register 

6502 .X register 

6502 .Y register 

6502 .P processor status register 

Timer 1 high order (MSB) latch byte 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

6522 VIA chip 2 

Timer 1 high order (MSB) latch byte 

Timer 2 high order (MSB) counter and MSB latch 

Peripheral control register for handshaking 

Interrupt flag register 

Interrupt enable register 

BASIC CLR 

Perform a cold start of BASIC 

Perform a warm start of BASIC 

Program patch area 

IRQ handler 

Power-on/rest routine (checks for autostart 

cartridge) 

NMI handler routine 

Restore 6502 registers from the stack and return 

from interrupt 

IRQ routine initial 6502 entry point 

Four unused bytes of 255 ($FF) 

6502 vector to 65193 ($FEA9) 

6502 vector to 64802 ($FD22) 

6502 vector to 65394 ($FF72) 

Code Chart of 6502 operation codes 



n 
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